| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
помогите пожалуйста считать из типизированного файла записи [D7, WinXP]
KLOD © (2005-10-08 12:25:00)помогите пожалуйста считать из типизированного файла записи
var
fn:file of string[10];
i:integer;
s:string;
begin
s:=edit1.Text;
assignfile(fn,'tel.txt');
reset(fn);
while not eoln do
begin
read(fn,s);
что то не получается говорит типы не совподают
Buss (2005-10-08 12:53:00) [1]Да. И закрыть файл не забудь
CloseFile(fn)
Buss (2005-10-08 12:52:00) [2]type
string10 = string[10];
var
fn : file of string10;
s : string10;
begin
assignfile(fn, 'tel.txt');
reset(fn);
while not eof(fn) do
begin
read(fn, s);
...
end;
end;
Buss (2005-10-08 12:48:00) [3]И переменная i здесь лишняя. И не ясности в строке
while not eoln do
Anatoly Podgoretsky (2005-10-08 12:43:00) [4]Типы разные - string и string[10]
s:string[10];
а эта строка зачем? s:=edit1.Text;
| |
