Introducir imagen en un campo
Como Introducir una imagen(jpg) en un campo de un formulario creando un botón de introducir imagen.
Respuesta de teseoteseo
1
Crea una acción en el formulario con la siguiente fórmula:
file := @Prompt([LocalBrowse]; "Selecciona un fichero JPG"; "3");
@If(file = ""; @Return(1); "");
@Command( [FileImport] ; "JPEG Image"; file)
Al pulsarlo cuando estés en un campo de tipo texto rico en modo de edición, te inserta el fichero elegido.
PD: Solo funciona en notes 6 por usar el LOCALBROWSE parameter del @prompt.
file := @Prompt([LocalBrowse]; "Selecciona un fichero JPG"; "3");
@If(file = ""; @Return(1); "");
@Command( [FileImport] ; "JPEG Image"; file)
Al pulsarlo cuando estés en un campo de tipo texto rico en modo de edición, te inserta el fichero elegido.
PD: Solo funciona en notes 6 por usar el LOCALBROWSE parameter del @prompt.
