TClientDataSet füllen

[DelTurbo]

Zitat von Delphi.Narium:

CSVDataSet.FieldByName(Fieldnames.Strings[i]).AsString := CSVFile.FieldByName[Fieldnames.Strings[i]];

Hi,
da kommt ein String zurück. Der kann nichts anderes.

@jbg,
ich dachte er erweitert den String automatisch... AHH da wars wieder... ich dachte.

Aber eine andere Frage, gibt es nicht einen Feldtyp der "mitwächst"? Also der so viel Platz belegt wie der String lang ist. Wenn nicht müsste ich wohl einmal die CSV durchlesen und schauen was Integer oder Boolean und mir den längsten String merken.

Aber noch eine frage zum Abschluss, wenn ich nun eine komplette CSV geladen habe und muss ein Feld/Spalte anfügen, kann CDS das?

Danke

[jbg]

Zitat von DelTurbo:

Aber eine andere Frage, gibt es nicht einen Feldtyp der "mitwächst"?

Ein Blob-Feld könnte dies, aber das wäre dann wohl der völlig falsche Datentyp. Ansonsten nein, so einen Datentyp gibt es beim CDS nicht.

Zitat von DelTurbo:

Aber noch eine frage zum Abschluss, wenn ich nun eine komplette CSV geladen habe und muss ein Feld/Spalte anfügen, kann CDS das?

Auch das geht nicht. Wenn das CreateDataSet gelaufen ist, kann man keine weiteren Felder hinzufügen. Die müssen vorher schon angelegt worden sein. Man muss sie nicht initial befüllen.

Deswegen denke ich, dass ein ClientDataSet für deinen Zweck ungeeignet ist und, wenn auch mehr Tipparbeit, eine Lösung ohne DataSet die bessere ist.

[Uwe Raabe]

Kannst du nicht die einzelnen CSV-Dateien einmal alle durchlaufen um die Felder anzulegen und dann nochmal separat für den Import?

Delphi-Quellcode:

    CSVDataSet:=TClientDataSet.Create(nil);
    CSVDataSet.Active:=False;
    CSVDataSet.FieldDefs.Clear;
    for <all CSV files> do begin
      <load FieldNames>
      for i:=0 to FieldNames.Count-1 do begin
        if CSVDataSet.FieldDefs.IndexOf(FieldNames.Strings[i]) < 0 then
          CSVDataSet.FieldDefs.Add(FieldNames.Strings[i],ftWideString,255,False);
      end;
    end;
    CSVDataSet.CreateDataSet;
    CSVDataSet.Active:=True;

[DelTurbo]

Hallo Uwe,
ich habe es mal Laufen lassen. Leider ist das mit CDS soooo langsam das es keinen spass macht. Ich bin gerade dabei, so wie jbg schrieb, das selber zu machen. Ich habe Dynamische Arrays wo ich alles in TStringList laufen lasse. Das ist viel viel schneller.

Trotzdem danke