Im Moment habe ich noch ein problemn wenn im Text ein Semikolon vorkommt - dann gibt es eine
Exception. Also bei
"das ist der;eigentliche Text Feld 1";"Feld 2";"Feld 3"
da bringt das erste Semikolon reproduzierbar ne
Exception.
Um das Problem analysieren zu können benötige ich mehr Informationen:
- Welche Exception?
- An welcher Stelle tritt die auf?
- Stack?
Das passiert an der Stelle Fields[j].AsString := slRow[j];
Delphi-Quellcode:
DisableControls;
for i := 0 to slFile.Count - 1 do
begin
slFile[i] := StringReplace(slFile[i], '"', '''', [rfReplaceAll, rfIgnoreCase]);
slRow.DelimitedText := slFile[i];
Append;
for j := 0 to slRow.Count -1 do
begin
Fields[j].AsString := slRow[j];
end;
Post;
end;
EnableControls;
finally
slFile.Free;
slRow.Free;
end;
---------------------------
Benachrichtigung über Debugger-
Exception
---------------------------
Im Projekt Mahnung.exe ist eine
Exception der Klasse $C0000005 mit der Meldung '
access violation at 0x00684abe: read of address 0x00000000' aufgetreten.
---------------------------
Anhalten Fortsetzen Hilfe
---------------------------
slRow[j] hat zu dem Zeitpunkt folgenden Inhalt:
"12345";"1";"Müller-Meyer";"Müller-Meyer-Schulze GmbH";"";"Elbchaussee 1";"D";"22000";"Hamburg";"";"Frau";"Michaela";"Mül ler";"+49 (40) 123456-0";"+49 (40) 123456 111";"m.mueller@mueller-meyer.de";"1";"36";"rechnung@mueller-meyer.de;
einkauf@mueller-meyer.de"
Gruß
Hans