Witajcie,
pokrótce mam plik tekstowy z liniami danych. Importuję go do bazy danych czytając linia po linii i wpisując wartości do zmiennych. Rozpoznaję zawartość linii po pierwszym znaku. Wszystko działa.
Jednak problemem są linie które są puste (hex 0D0A czyli sam enter). Gdy na takie natrafiam i sprawdzam pierwszy znak dostaję wyjątek.
Oto mały przykład kodu jaki stosuję (całkowity standard):
var plik_wejscie : TextFile;
dane, dwukropek, srednik : String;
begin
AssignFile(plik_wejscie, 'c:\1.txt');
Reset(plik_wejscie);
try
while not eof(plik_wejscie) do
begin
Readln(plik_wejscie, dane);
if (dane[1] = ':') then
dwukropek:=dane;
if (dane[1] = ';') then
srednik:=dane;
end;
finally
end;
CloseFile(plik_wejscie);
end;
Try nie chroni przed wyjątkiem.
Czy znacie sposób obejścia tego problemu? Acha, znak enter (na którym się wykładam) nie musi kończyć pliku, chciałbym czytać plik aż do końca (eof).
Pozdrawiam
Robert