Guardar Foto

[DamianG]

Buenas tardes leí un monton de mensajes y no logro encontrar cual es la forma correcta de guardar una imagen en una base de datos mysql a la que me conecto por medio de Datasnap y el insert es un procecimiento almacenado.
Tendran algún ejemplo ?

asi es como guardo los datos:

Código Delphi [-]
 cmInm.SqlServerMethodTabla1Agregar.ParamByName('gas').Value := 0
 cmInm.SqlServerMethodTabla1Agregar.ParamByName('telefono').Value := 1;
 cmInm.SqlServerMethodTabla1Agregar.ParamByName('longitud').Value := '';
 cmInm.SqlServerMethodTabla1Agregar.ParamByName('imagen').Value := tiene que ser una variable ya convertida ???;
 cmInm.SqlServerMethodTabla1Agregar.ExecuteMethod;

Muchas gracias

[Casimiro Notevi]

Mira los enlaces del final de página, abajo del todo.

[[gatosoft]]

Empezado por DamianG

Código Delphi [-]
 cmInm.SqlServerMethodTabla1Agregar.ParamByName('imagen').Value := tiene que ser una variable ya convertida ???;

¿que componente utilizas?, la mayoria tiene la opcion Load Formfile.. para cargar un archivo...

Código Delphi [-]
  ADStoredProc1.ParamByName('').LoadFromFile(archio, blobtype);

tambien está la opción Assign para cargar objetos en que tengas en memoria, como BMPs, streams, etc

Código Delphi [-]
 ADStoredProc1.ParamByName('').Assign()

y sigue el consejo de casimiro... revisa los links de la parte inferior de la pagina... tienen ejemplos

[DamianG]

Muchas gracias, voy a probar. Estoy investigando porque no me queda claro como mandar al servidor DATASNAP la imagen convertida.

[DamianG]

Bueno.. después de quemarme la cabeza, llegue al punto que pude guardar la imagen en la base de datos (mysql) por medio de datasnap. El problema que tengo ahora es que no logro guardarla cuando el tamaño de la misma supera los 32000 bytes, encontré ejemplos que se suponen lo soluciona pero no hay caso. Por el momento lo voy a tratar de hacer subiendo la imagen por ftp.

Muchas gracias.