переменные файла

← →
self001 (2004-11-18 21:04) [0]

нужно чобы с файла считалось 3 переменых (i:integer;s,s1:string;)
делаю я так
(l:tfile*tfile = record ...*,f:textfile)
begin
assignfile(f,"c:\go.txt");
reset(f);
while not eof(f) do
begin
readln(f,l.s);

memo1.Lines.Add(s);
end;
closefile(f);
end;
вся проблема в том что в файле есть еще цыфры которые
принадлежат i как выводить только s без i

← →
Anatoly Podgoretsky © (2004-11-18 21:05) [1]

А по русски и с примером?

← →
self001 (2004-11-18 21:16) [2]

ПРИМЕР
*korn = record
i:integer;
s:string;
end;*
*var
l:korn;
f:textfile;*
>>procedure TForm1.Button1Click(Sender: TObject);
var
begin
assignfile(f,"c:\korn.txt");
reset(f);
while not eof(f) do
begin
readln(f,l.s);

memo1.Lines.Add(l.s);
end;
closefile(f);

end;
в файле такие поля
a 1
2
ясно что это все string но нужно что бы разделялмсь переменные S
и I
вывод должен быть
>>a
а не
a1
2

← →
Anatoly Podgoretsky © (2004-11-18 21:23) [3]

Переменная структура строк, можно читать только как строки и делать парсинг, по своим правилам.

не используй текстфайл в пользу файла данного типа и счастие настанет.

переменные файла Найти похожие ветки