摘要: 阅读全文
posted @ 2010-01-21 13:31 万一 阅读(5349) 评论(13) 推荐(0) 编辑
摘要: //放置控件: ClientDataSet1、DataSource1、DBGrid1、Button1, 然后procedure TForm1.Button1Click(Sender: TObject);begin { 添加字段 } with ClientDataSet1.FieldDefs.AddFieldDef do begin Name := 'ID'; DataType := ftIn... 阅读全文
posted @ 2010-01-21 10:29 万一 阅读(9313) 评论(5) 推荐(2) 编辑