怎样让DBEdit显示access的备注字段呢?

life923 2011-11-22 10:25:34
默认都是显示memo,怎样通过代码设置呢?


ADOQuery1.FieldByName('address')

我这是动态字段的 所以不能在字段编辑器里面设置
...全文
125 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
auqfiudh 2011-11-29
  • 打赏
  • 举报
回复
嗯是这样的。 之前找到个C++的 看不董。。。
kaikai_kk 2011-11-22
  • 打赏
  • 举报
回复

private
procedure Getaddress(Sender: TField; var Text: String;DisplayText: Boolean);
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Getaddress(Sender: TField; var Text: String;DisplayText: Boolean);
begin
Text:=Sender.AsString;
end;

procedure TForm1.ADOQuery1AfterOpen(DataSet: TDataSet);
begin
ADOQuery1.FieldByName('address').OnGetText:=Getaddress;
end;

5,389

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧