Hola Edgar.
Podrías usar un
TOpenPictureDialog para buscar la imágen y luego en el evento
OnClick del botón, hacer algo como por ejemplo:
Código Delphi
[-]
...
uses jpeg;
procedure TForm1.Button1Click(Sender: TObject);
var
Jpg : TJPEGImage;
begin
if OpenPictureDialog1.Execute then
begin
Jpg := TJPEGImage.Create;
try
Jpg.LoadFromFile(OpenPictureDialog1.FileName);
DataSet.Edit;
DataSet.FieldByName('CAMPO_BLOB').Assign(Jpg);
finally
Jpg.Free;
end;
end;
end;
No utilizo
MySQL, pero en
Firebird guarda la imágen jpg sin problemas.
Saludos.