Moin,
sorry wenn ich hier so was altes raussuche aber das hilft mir gerade sehr weiter. Allerdings ...
1) ich müsste den Trenner von Semikolon auf TAB ändern .. das wäre dann
imho hier die "#9" statt "';'"
Delphi-Quellcode:
type
TClientDataSetCsvClassHelper = class helper for TClientDataSet
procedure LoadFromFile(Filename: string; const StringLength: Integer = 100;
const FirstLineTitle: Boolean = False;
const Delimiter: Char = #9; const QuoteChar: Char = '"');
procedure SaveToFile(Filename: string; const FirstLineTitle: Boolean = False;
const Delimiter: Char = #9; const QuoteChar: Char = '"');
end;
2) Was mache ich wenn ich nicht auf QuoteChars reagieren möchte ? Die Datei die ich habe hat keinen Texttrenner, dafür aber mitten im Text Anführungsstriche.
Hans