Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.03.27;
Скачать: CL | DM;

Вниз

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

 
Игнатенков Станислав   (2005-03-09 20:05) [0]

подскажите как загрузить

[code]
 RTile = record
  tilenumber: byte;
  solid: boolean;
  extraflag: byte;
 end;
 RMap = record
  s:integer;
  t:byte;
  tiles_filename:string[45];
  tileset : array[0..255,0..255] of Rtile;
 end;

var
 map:RMap;

procedure save;
var
 savefile: File of RMap;
begin

   AssignFile(savefile,"test.bin");
   Rewrite(savefile);

   Write(savefile,map);

   CloseFile(savefile);

end;[/code]

как потом файл загрузить?
read(savefile,map) почему то выдает ощибку IO 6


 
Игнатенков Станислав   (2005-03-09 20:07) [1]

ИЗВИНИТЕ :)))
Нашел ошибку!!! я писал вообще не существующее имя файла! Бывает



Страницы: 1 вся ветка

Текущий архив: 2005.03.27;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.029 c
1-1111053708
Ega23
2005-03-17 13:01
2005.03.27
Максимальное кол-во записей в TMemo


1-1110642207
nes
2005-03-12 18:43
2005.03.27
OpenDialog ---> Multi Select


1-1110778169
JetMan
2005-03-14 08:29
2005.03.27
Из DBGrid в Excel


14-1109939978
Sicilla
2005-03-04 15:39
2005.03.27
Adware


1-1110808721
lehich
2005-03-14 16:58
2005.03.27
winexec и передаваемые параметры