Hallo zusammen,
habe gerade ein kleines Problemchen ich lese eine mit ; seperierte Datei zeilenweise ein und Schreibe die einzelnen Spalten in ein Stringgrid. Dies funktioniert im Grunde auch schon nun habe ich einen Datensatz mit einem umlaut hier wird mir aber nur gewurstel eingelesen.
Hier ein Ausschnitt mit dem meiner sei achten relevanten teil, wenn ich die Variable sTmp nun einsehe hat diese schon den Fehler:
Delphi-Quellcode:
Var
slFilePrev: TStringList;
iChar, iRow, iCol, iLenDelimiter, iRows, iCols, iColsCk: Integer;
F: Textfile;
sGetLn, sTmp, sDelimiter: string;
begin
try
//Set important Parameters
iRow:= 0;
iRows:= 0;
iCols:= 0;
iColsCk:= 0;
sDelimiter := ';';
iLenDelimiter := Length(sDelimiter);
//File Settings
AssignFile(F,'C:\Test.txt');
Reset(F);
//File Validation and count of Col's and Row's
while not eof(F) do
begin
iCols := 0;
readln(F,sTmp);
Viele Grüße und mit bestem Dank im Vorraus
Johannes