Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

переменные файла [D7, WinXP]

self001 © (2004-11-18 21:04:00)
нужно чобы с файла считалось 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

KilkennyCat (2004-11-18 22:19:00) [1]
не используй текстфайл в пользу файла данного типа и счастие настанет.

Anatoly Podgoretsky (2004-11-18 21:23:00) [2]
Переменная структура строк, можно читать только как строки и делать парсинг, по своим правилам.

self001 (2004-11-18 21:16:00) [3]
ПРИМЕР
*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:05:00) [4]
А по русски и с примером?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »