為ADOQuery1動(dòng)態(tài)添加Field
var? sField:TStringField;? ?
sField:=TStringField.Create(Self);
? ? sField.FieldName:=sPart;
? ? sField.Name:='ADOQuery1'+sPart;
? ? sField.DataSet:=ADOQuery1;
為ADOQuery1動(dòng)態(tài)添加Field
var? sField:TStringField;? ?
sField:=TStringField.Create(Self);
? ? sField.FieldName:=sPart;
? ? sField.Name:='ADOQuery1'+sPart;
? ? sField.DataSet:=ADOQuery1;