![]() |
|
|
|
|
#1
|
||||
|
||||
|
Код:
if OpenPictureDialog1.Execute then
begin
Table1.Edit;
TGraphicField(Table1.FieldByName('Graphic')).LoadFromFile(OpenPictureDialog1.FileName);
Table1.Post;
end;Код:
DBImage1.Stretch:=True; |