摘要:
Required、Precision、MaxValue、MinValue:begin { Required: 必填字段 } with TIntegerField.Create(Self) do begin FieldName := 'ID'; Required := True; DataSet := ClientDataSet1; end; { Precision: 浮点数精度} wit... 阅读全文
posted @ 2010-02-09 20:03
万一
阅读(4794)
评论(0)
推荐(0)
摘要:
procedure TForm1.FormCreate(Sender: TObject);begin { DisplayFormat } with TIntegerField.Create(Self) do begin FieldName := 'Integer'; DisplayFormat := '#, 元'; DataSet := ClientDataSet1; end; with ... 阅读全文
posted @ 2010-02-09 18:13
万一
阅读(3706)
评论(1)
推荐(1)
摘要:
自动增长字段://建立方法一:begin with ClientDataSet1 do begin FieldDefs.Add('ID', ftAutoInc); FieldDefs.Add('Name', ftString, 11); CreateDataSet; end;end;//建立方法二:begin with TAutoIncField.Create(Self) do begin ... 阅读全文
posted @ 2010-02-09 16:00
万一
阅读(5244)
评论(5)
推荐(0)
浙公网安备 33010602011771号