請問各位先進：
我參考之前發表的文件,寫出以下程式,可儲存jpg圖檔,但是執行資料的Next 或prve時,圖片卻看不見了,請問不知是何原因,煩請解答謝謝
procedure TfrmMoldData.Button18Click(Sender: TObject);
var
jpeg: TJpegImage ;
begin
OpenFile.Execute;
jpeg:= TJPEGImage.Create;
jpeg.LoadFromFile(OpenFile.FileName);
DBImage1.Picture.Assign(jpeg);
Image1.Picture.Assign(DBImage1.Picture);
jpeg.free;
end;

把你這段程式碼寫在 Dataset 的 AfterScroll Event 中試試

Delphi本身並不支援jpg, 你uses jpeg看看能否解決!

感謝你,問題已解決.