IwDbGrid中Column之动态建立

最新推荐文章于 2023-01-30 16:33:41 发布

咖啡色的浪漫

最新推荐文章于 2023-01-30 16:33:41 发布

阅读量2.1k

点赞数

分类专栏： B/S学习文章标签：测试

本文链接：https://blog.csdn.net/micel108/article/details/1521220

版权

B/S学习专栏收录该内容

2 篇文章 0 订阅

订阅专栏

name="google_ads_frame" marginwidth="0" marginheight="0" src="http://pagead2.googlesyndication.com/pagead/ads?client=ca-pub-3528650120430763&dt=1183890684015&lmt=1183890684&format=468x60_as&output=html&correlator=1183890684000&url=http%3A%2F%2Fgmai9999.googlepages.com%2Fhome&ad_type=text_image&ui=rc%3A0&cc=100&flash=9&u_h=768&u_w=1024&u_ah=738&u_aw=1024&u_cd=32&u_tz=480&u_java=true" frameborder="0" width="468" scrolling="no" height="60" allowtransparency="allowtransparency">

procedure TIWForm1.IWButton1Click(Sender: TObject);
var
clm : TIWDbGridColumn;
begin

clm := TIWDbGridColumn(IWDBGrid1.Columns.Add);
clm.Title.Text := '编号';
clm.DataField := 'ID';

with ds do
begin
    Active := false;
    CommandText := 'select ID from UseData ';
    open;
end;
end;

环境：

BDS2006＋Winxp Sp2＋Acess2003

测试通过
name="google_ads_frame" marginwidth="0" marginheight="0" src="http://pagead2.googlesyndication.com/pagead/ads?client=ca-pub-3528650120430763&dt=1183890684015&lmt=1183890684&format=468x60_as&output=html&correlator=1183890684000&url=http%3A%2F%2Fgmai9999.googlepages.com%2Fhome&ad_type=text_image&ui=rc%3A0&cc=100&flash=9&u_h=768&u_w=1024&u_ah=738&u_aw=1024&u_cd=32&u_tz=480&u_java=true" frameborder="0" width="468" scrolling="no" height="60" allowtransparency="allowtransparency">