Bonsoir,
Juste un truc après avoir stocké ton .jpg dans ta base par :
grâce un champ IMAGE type BLOB(1,1)
Sur le OnCreate ->>> Qtest.Open (query)
procedure TForm1.Button1Click(Sender: TObject);
begin
QTest.Append;
QTestIMAGE.LoadFromFile('Foudre14.jpg');
QTest.Post;
end;
Tu peux visualiser directement tes images en faisant défiler tes enregistrements en utilisant le Compo: TjvDBImage (qui lit nativement les jpg) évitant ainsi la conversion.
Le tout couplé à un TDBNavigator.
cantador
