Pregunta: | 10708 - COMO LLAMO UN IMAGEN UTILIZANDO UNA VARIABLE |
Autor: | edwin diaz |
Estoy creando un pequeño programa de control de personal (hoja de vida) el formulario me debe llamar la foto de la persona que encuentra almacenada con el numero de idenificación de la persona (variable), alguien me puede decir como hacerlo, he probado con loadpicture pero me dice que los tipos no coinciden
gracias |
Respuesta: | Jose Jaimes |
Ok mira la programacion te sirve para copiar dentro de una base de datos y utilizar la imagen como si fuera el escritorio de windows en FoxPro 6.0
Recuerda tener una Imagen Ok thisform.Image1.picture en el Form Activate... PUBLIC gcTable gcTable="" select fondos set order to tag Ifon go top scatter memvar memo ima=imagenes thisform.image1.picture="&ima" thisform.refresh() ******* en un Boton de Commando gcTable = GETFILE('BMP,JPG', 'Abrir Imagen...', 'Examinar',1,'Control Fondos') DO CASE CASE 'Sin título' $ gcTable CREATE (gcTable) CASE EMPTY(gcTable) RETURN OTHERWISE sfb=1 THISFORM.image1.picture=gcTable thisform.txtimagenes.value=gcTable ENDCASE *** Para Aceptar la Imagen y Guardar la en la Tabla select fondos set order to tag Ifon go top GO 1 jo=messagebox("¿Seguro de Modificar?...",4+32,"Mensaje de Registro...") if jo=6 gather memvar memo _SCREEN.PICTURE="&gcTable" thisform.refresh() **READ EVENT endif Espero sea de tu Ayuda... |
Respuesta: | Josué Córdoba |
Antes ya habia hecho un ejercicio parecido y lo que hice fue lo siguiente,
los datos de un empleado son dependientes de una clave, incluyendo su fotografía, en un campo memo solo grabe la ruta de la imagen al registrarlo con getpict ()... de tal forma que al llamar sus datos debes emplear un codigo tan sencillo como este: set order to claveempleado if seek (alltrim(thisform.text1.value)) thisform.image1.picture=campoquealmacenalaruta endif claro image1 es un objeto de imagen... lo ves? es muy sencillo espero te sirva de algo.... saludos desde Oaxaca Mexico |
Respuesta: | Antonio Estrada |
Supongo que lo que quieres hacer es mostrar el contenido de un fichero gráfico (bmp o jpg) en un control IMAGE que está en un formulario.
Si es eso, solo tienes que modificar la propiedad picture del control como NOMBRE_VARIABLE+".BMP", siempre y cuando la variable sea de tipo texto, si no, tienes que poner ALLTRIM(STR(NOMBRE_VARIABLE))+".BMP" Espero haberte ayudado |