我用dbedit控件‘d5’显示数据库中的数据,由于dbedit控件连接的字段是一个带有路径的文件名,如果直接输入比较麻烦,因此我用OpenPictureDialog控件‘op’和Button控件,
用户选中文件后,dbedit控件中自动输入文件名和路径,代码如下,可是按与之相连的DBNavigator控件上的刷新键,dbedit控件的text自动清空,数据不能保存,有时出现couldn’t perform the edit because another user changed the record 的错误提示。手工输入正常,不知为何
procedure Tkh.PDJButton1Click(Sender: TObject);
begin
op.Execute;
d5.Text:=op.FileName ;
end;