抓狂小白的程式筆記

沒有連結資料庫也能使用TDataset元件的功能

TStrings 可以記錄一對一的條件 但一對二 以上用這個比較方便

  with ClientDataSet1 do
  begin
    with TStringField.Create(Self) do
    begin
      Name := 'ClientDataSet1FirstName';
      FieldKind := fkData;
      FieldName := 'FieldName';
      Size := 72;
      DataSet := ClientDataSet1;
    end; //FieldName
    with TMemoField.Create(Self) do
    begin
      Name := 'ClientDataSet1LastName';
      FieldKind := fkData;
      FieldName := 'Last Name';
      DataSet := ClientDataSet1;
    end; //Last Name
    CreateDataSet  //完全虛擬CDS
  end;