|
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - Jose Arriagada
Páginas: 1 ... 6 7 [8] 9 10 ... 15
176
« en: Miércoles 7 de Julio de 2004, 16:32 »
Prueba lo siguiente:
En tu proyecto incorpora - 1 control commondialog - 1 label - 1 command
y usa el siguiente codigo
Private Sub Command1_Click() 'Aqui se abre el cuadro de busqueda del archivo 'Si quieres que solo te muestre imagenes, elimina el comentario inicial de la siguiente linea 'CommonDialog1.Filter = "Imagenes Paintbrush (bmp)|*.bmp|Imagenes Gif|*.gif|Imagenes JPG|*.jpg" CommonDialog1.ShowOpen Label1.Caption = CommonDialog1.FileName End Sub
Prueba, espero te sirva
177
« en: Miércoles 7 de Julio de 2004, 16:26 »
Nos alegramos mucho que hayas podido tu solito resolver tu problema. Esto te da la idea, que a veces es necesario aunque sea comentar el problema, y la solucion se producira en algun momento en tu cabeza. Suerte
178
« en: Martes 6 de Julio de 2004, 23:54 »
Hola amigos:
Requiero presentar al usuario lo siguiente: Nodos padres con la opcion checkbox presente, y dentro de cada nodo padre, van nodos hijos, pero estos no deben llevar la opcion checkbox presente. Existe algun control que permita esta dualidad de opciones dependiendo del nivel del nodo, o, existe algun truco que permita simular el efecto deseado.
Gracias por la ayuda
179
« en: Martes 6 de Julio de 2004, 23:50 »
Tu pregunta es bastante ambigua, ya que uno podria pensar: a) Guardar el path de "alguna" o "algunas" imagen(es) que cargaras en el sistema para efectos visuales. Para ello no es necesario tener que guardarlo en una base de datos. Simplemente, guarda el (los) dato(s) en un archivo plano, que contenga la ruta, y cada vez que se inicie el sistema, lees este archivo. . Guardar "muchas" imagenes en una base de datos, que es una parte de las funcionalidade del programa. De ser asi, asumo que para visualizar la imagen, utilizas el control CommonDialog para buscar el archivo, y si es asi, entonces este mismo control te entrega la ruta del archivo capturado. Ahora, si no es ninguna de estas opciones, entonces, podrias ser mas explicita para poder ayudarte.
180
« en: Lunes 5 de Julio de 2004, 17:06 »
Quizas pueda ayudarte si nos aclaras que significa IDENTAR, ya que recuerda somo de diferentes paises, y por tanto, no siempre las palabras nos indica el problema a resolver.
181
« en: Martes 29 de Junio de 2004, 16:16 »
Ahi te va un ejemplo, espero te sirva
182
« en: Martes 29 de Junio de 2004, 16:14 »
Utiliza
FileCopy origen,destino
183
« en: Jueves 24 de Junio de 2004, 20:36 »
Enviame un mensaje a arcangel_gabriel@123mail.cl y te envio por email el instalador spread de farpoint. No requiere licencia.
184
« en: Jueves 24 de Junio de 2004, 20:32 »
Te envio un ejemplo de como guardar datos en una planilla. El tema de presentar al usuario los campos que desea seleccionar para exportar, es basico y te lo dejo, para hacer trabajar "las neuras".
185
« en: Lunes 21 de Junio de 2004, 23:35 »
Hola amigos, alguno de ustedes sabe como cambiar el color de fondo del control ssTab. La idea es que se cambie el cuerpo completo, no los espacios entre las pestañas, ni cargar una imagen en la pestaña.
Gracias
186
« en: Lunes 21 de Junio de 2004, 16:57 »
Gracias, esa era la respuesta.
187
« en: Viernes 18 de Junio de 2004, 23:05 »
Hola amigos, haber si me podeis ayudar.
Tengo una aplicacion en la cual, en tiempo de diseño confecciono la barra de botones, agregando los botones, los iconos, los caption y tooltiptext. La cosa funciona bien, pero se hace dificil de administrar a medida que voy creando nuevo botones.
La cosa es que implemente la creacion de la barra de botones en tiempo de ejecucion, cosa que lo hace bien.
El problema esta en que, al presionar un boton, se me abre la ventana que deseo, pero el boton se mantiene con el efecto de presionado. Cuando saldo de la ventana, en la cual estoy trabajado, y nuevamente presiono el mismo boton, ahora el boton sube, y la ventana se abre sin problemas.
Es decir, el boton se hunde y se levanta alternadamente. La aplicacion no tiene ningun problema. Solo es un efecto visual de los botones.
Alguien sabe a que se debe y como se soluciona.
Gracias.
188
« en: Viernes 18 de Junio de 2004, 22:57 »
Ya se ha visto en discusiones anteriores que es mas facil enlazar las imagenes almacenarlas en las tablas, si no que guardar la imagen en algun directorio, y despues hacer la referencia.
Teniendo en cuenta este detalle, pasemos a lo escencial.
Claramente tus empleados deben tener un numero UNICO (llave o clave de acceso), por que asi, es la unica forma de que esto funcione.
Supongamos que el campo llave de tu tabla de datos de empleados es ID_Empleado, y que tu directorio para almacenar informacion es C:\DATAEMP y dentro de este se tiene un directorio para las imagenes, especificamente la foto de cada uno de ellos, llamemos a este directorio FOTOS. En resumen tenemos C:\DATAEMP\FOTOS
Al hacer la carga de los datos del empleado, entonces utilizas el siguiente codigo para traer la imagen a la pantalla.
picFoto.picture=loadpicture("C:\DATAEMP\FOTOS\" & idemp)
donde idemp, es el codigo llave que identifica al empleado.
Ahora, como veo que tienes un boton de agregar/cambiar foto, al grabar los datos del empleado, lo que debes hacer tambien, es copiar la imagen desde el origen (desde donde la capturaste y copiarla a C:\DATAEMP\FOTOS\idemp ) con el codigo de llave del empleado, para no perderla.
Espero te sirva.
189
« en: Jueves 17 de Junio de 2004, 16:58 »
Yo he intentado lo mismo, pero no funciona. Lo que he hecho para que mis botones aparezcan iconos muy, pero muy parecidos al XP, es utilizar microangelo (diseñador de iconos) y capturar el icono XP y despues grabarlo con la maxima capacidad de colores.
Al insertarlos en mis botones y aplicaciones, se ven espectaculares. La unica diferencia, entre un icono win98 y xp, es la cantidad de pixels y la paleta de colores. Pero haciendo un trabajito extra, se logra el mismo efecto
190
« en: Miércoles 16 de Junio de 2004, 16:02 »
Te envio unos codigos por si te sirven.
191
« en: Viernes 11 de Junio de 2004, 18:13 »
Hola amigos, he incursionado en el uso del control vbskinner. Me gusto mucho la idea de este control Asi es que busque y baje el control con sus ejemplos. Espectacular. El problema, es que requiere licencia. UNA LATA. No existe el crack para el vbskinner pro 2.0, pero averiguando si existen los cracks para la version 1.3
Sera posible que alguno de ustedes tenga el control. No necesito enlaces a vbskinner 1.3, por que todos apuntan a los mismos sitios, que al final siempre es la version 2.0
Gracias
192
« en: Jueves 10 de Junio de 2004, 23:31 »
Ingrese al link que indicas, pero al seleccionar el vbskinner, no me hace nada.
Alguien logro obtener el crack del vbskinner pro 2.1 ?
193
« en: Martes 8 de Junio de 2004, 15:39 »
Nada mejor que un codigo que se ejecute, y asi podras ver como funciona y adaptarlo a tus necesidades
194
« en: Martes 8 de Junio de 2004, 15:26 »
Prueba el siguiente procedimiento
sLectura=ucase(trim(text1.text)) largo=len(sLectura) pos=instr(sLectura,"EXP") numero1=cdbl(mid(sLectura,1,pos-1)) numero2=cdbl(mid(sLectura,pos+4,largo-pos+4)) 'Ahora tienes ambos valores de tu lectura, solo falta 'transformarlos en un solo valor, de acuerdo a tu base.
195
« en: Viernes 4 de Junio de 2004, 15:42 »
Tu problema en este momento son dos: - El problema planteado por tu profesora. - Tu nula capacidad de transmitir el problema para poder ayudarte. (no me quiero imaginar como seras para exponer tus trabajos frente a tus compañeros, pero bueno, eso es harina de otro costal)
Primero deberias tener claro cual es el requerimiento que te estan planteando, y posteriormente ver si tienes las herramientas y conocimientos para resolverlo.
Si una vez entendido el problema, y comienzas a resolverlo, y te trancas con alguna dificultad para continuar, entonces para eso estan los foros.
Pero para hacerte la tarea completa, no creo que haya alguien dispuesto, o que tengo tiempo.
Plantea un requerimiento especifico, pero no pidas que te resuelvan el problema.
"Nadie nace sabiendo, todos aprendemos con la experiencia"
196
« en: Viernes 4 de Junio de 2004, 15:36 »
Claramente la solucion pasa por dos areas: - La informatica, ya que solo los que estudian esta ciencia, saben a que se refiere. - La programacion, como solucionar el problema.
Dado que tus conocimientos de grafos parecen estar en orden, pasemos al area de programacion.
Especificamente como estan solucionando el problema, y en que parte no sabes como resolverla?
197
« en: Miércoles 2 de Junio de 2004, 23:13 »
Para validar email usa esta funcion
Public Function Es_EMail(ByVal femail As String) As Boolean femail = LCase(Trim(femail)) Largo = Len(femail) estado = 1 posicion = 0 Es_EMail = True While Not estado = 0 And posicion < Largo posicion = posicion + 1 caracter = Mid(femail, posicion, 1) Select Case estado Case 1: Select Case caracter Case "a" To "z": estado = 1 Case "_", ".": estado = 2 Case "@": estado = 3 Case Else estado = 0 End Select Case 2: Select Case caracter Case "a" To "z": estado = 2 Case "_", ".": estado = 1 Case "@": estado = 3 Case Else estado = 0 End Select Case 3: Select Case caracter Case "a" To "z": estado = 3 Case "_": estado = 4 Case ".": estado = 5 Case Else estado = 0 End Select Case 4: Select Case caracter Case "a" To "z": estado = 4 Case "_": estado = 3 Case ".": estado = 5 Case Else estado = 0 End Select Case 5: Select Case caracter Case "a" To "z": estado = 5 Case "_": estado = 5 Case ".": estado = 5 Case Else estado = 0 End Select End Select Wend If estado = 0 Then Es_EMail = False Else Es_EMail = True End If End Function
Para validar fecha, usa la funcion isdate
if IsDate(text1.text) then msgbox "Es fecha" else msgbox "No es fecha" endif
198
« en: Miércoles 2 de Junio de 2004, 23:01 »
En la barra de herramientas presiona el boton derecho y selecciona Componentes Activa la casilla Microsoft Common Dialog Control 6.0 Presiona Aceptar
Ahora agrega este control a tu form y un boton y coloca la siguiente sentencia
Private Sub Command1_Click() CommonDialog1.ShowColor End Sub
199
« en: Lunes 31 de Mayo de 2004, 16:26 »
Gracias a ambos, en especial a cyclop.
Voy a probar tu sentencia
200
« en: Viernes 28 de Mayo de 2004, 18:45 »
Estimados,
La situacion es la siguiente:
Muchas veces se desea saber si una variable es alguna de las muchas opciones a comparar, por ejemplo:
IF xVAR=1 or xVAR=3 or xVAR=7 or xVAR=0 then <sentencias> ENDIF
o en su defecto, podria ser SELECT CASE xVAR CASE 1,3,7,0: <sentencias> END SELECT
Pero, igualmente es mucho codigo, para una sentencia tan simple.
Mi pregunta es: ¿EXISTE ALGUNA FUNCION QUE PERMITA SABER SI LA VARIABLE PERTENECE A ALGUNA DE ESTAS OPCIONES?, como por ejemplo
IF COMPARA(xVAR,1,3,7,0)=TRUE THEN <sentencias> ENDIF
Si no, voy a terner que hacer esta funcion. La lata, es colocar una cantidad n de variables de paso.
Páginas: 1 ... 6 7 [8] 9 10 ... 15
|
|
|