F
frogking
Unregistered / Unconfirmed
GUEST, unregistred user!
我想往数据库中存入图像,用Tabel1指向数据库,DataSouse1也进行了相应的设置,
数据库中有一个字段为图像类型。
部分代码如下:
...
procedure TForm1.Button1Click(Sender: TObject);
var graphic1:TGraphic;
begin
graphic1:=TGraphic.Create;
opendialog1.execute;
graphic1.loadfromfile(opendialog1.filename);
//好像这里有问题
table1.insert;
table1.FieldByName('picture').assign(graphic1);
table1.post;
end;
...
能够通过编译,运行时出错。
出错信息如下:Project Project.exe raised exception class EAbstractError with
message 'Abstract Error'. Processs stoped. Use Step or Run to continue.
不知道为什么?望高手指导!!
数据库中有一个字段为图像类型。
部分代码如下:
...
procedure TForm1.Button1Click(Sender: TObject);
var graphic1:TGraphic;
begin
graphic1:=TGraphic.Create;
opendialog1.execute;
graphic1.loadfromfile(opendialog1.filename);
//好像这里有问题
table1.insert;
table1.FieldByName('picture').assign(graphic1);
table1.post;
end;
...
能够通过编译,运行时出错。
出错信息如下:Project Project.exe raised exception class EAbstractError with
message 'Abstract Error'. Processs stoped. Use Step or Run to continue.
不知道为什么?望高手指导!!