rsdall_win.picturequery.close; rsdall_win.picturequery.sql.clear; rsdall_win.picturequery.sql.add('select * from picture where id="' + query5.fieldbyname('id').asstring + '"'); rsdall_win.picturequery.open; if not rsdall_win.picturequery.eof then begin t := Tjpegimage.Create; Stream1 := TBlobStream.Create(rsdall_win.picturequerypicture, bmRead);////这句话看不懂!! t.LoadFromStream(Stream1); rsdall_win.image1.Picture.Graphic := t; end else rsdall_win.image1.Picture.bitmap := nil;
rsdall_win.picturequery.sql.clear;
rsdall_win.picturequery.sql.add('select * from picture where id="' + query5.fieldbyname('id').asstring + '"');
rsdall_win.picturequery.open;
if not rsdall_win.picturequery.eof then
begin
t := Tjpegimage.Create;
Stream1 := TBlobStream.Create(rsdall_win.picturequerypicture, bmRead);////这句话看不懂!!
t.LoadFromStream(Stream1);
rsdall_win.image1.Picture.Graphic := t;
end
else
rsdall_win.image1.Picture.bitmap := nil;