[Lazarus-es] tquery insertar imagen en mysql

[Horacio Jamilis]

Debieras usar algo asi como

sqlquery1.Params[0].LoadFromFile([Nombre de Archivo]);

No lo cargues primero a un TImage.

Si por el contrario lo tienes en un timage, creas un tmemorystream, 
grabá la imagen del timage con...

procedure ....
var
  ms : TMemoryStream;
begin
  ms := TMemoryStream.Create;
  Image1.Picture.Bitmap.SaveToStream(ms);
  ms.Position := 0;
  sqlquery1.Params[0].LoadFromStream(ms);
  [...]

Espero que te sirva

Horacio

>      //armo el insert
>      SQLQuery1.SQL.Add('insert into imagenes ');
>      SQLQuery1.SQL.Add('(imagen) values (:IMAGEN)');
>
>      //esta es la linea que tengo que resolver...
>      SQLQuery1.Params.ParamByName('IMAGEN').As ????
>
>      SQLTransaction1.StartTransaction;
>      SQLQuery1.ExecSQL;
>      SQLTransaction1.Commit;
>   end;
>
>
> la pregunta es: ¿como seteo el parametro IMAGEN?
>
> uso AsBlob, AsString ?
>
> con qué propiedad del widget image?
>
> gracias
>