procedure TForm1.Button10Click(Sender: TObject);
begin
if openpicturedialog1.Execute then
try
Table1.Edit ;
Table1.FieldByName('字段类型是G名称') as tblobfield).LoadFromFile(openpicturedialog1.FileName);
Table1.Post ;
except
showmessage ('图片保存失败!') ;
end ;
end;