Показать сообщение отдельно
Старый 03.11.2007, 17:53   #49 (Ссылка на пост)
Dreamer
Мечтатель
Пол:
 
Активность Longevity
0/20 19/20
Today Сообщения
0/5 sssss1291
Благодарил(а): 834
Благодарили 217 раз в 120 постах
Галерея: 0
Вес репутации: 22 Dreamer имеет великолепную ауруDreamer имеет великолепную ауру
Отправить сообщение для  Dreamer с помощью ICQ
По поводу файлов звписей
Делается так...
В разделе Type описываем тип кот. базируется на записе:
Type
Rec=record
x:boolean;
...
end;
Потом в разделе Var описываем переменную описаного ранее типа и файл (файловую переменную) элементы которого описаного ранее типа:
Var
R:Rec;
F:File of Rec;
В разделе реализации присваиваем значения полям записи R:
R.x:=True;
...
Связываем файловую переменную с файлом на диске. Создаём файл и открываем его для записи. Записываем в него R. Закрываем файл:
Assign(F,'File.rec');
Rewrite(F);
write(F,R);
Close(F);
Вот и всё...
Ясно?

Последний раз редактировалось Dreamer, 03.11.2007 в 21:45.
Dreamer вне форума  
Ответить с цитированием
Сказали Спасибо пользователю Dreamer за этот пост:
TAVI$K@R()N (03.11.2007)