Недавно добавленные исходники

•  Animation Loaders  847

•  DeLiKaTeS Tetris (Тетрис)  5 800

•  TDictionary Custom Sort  7 758

•  Fast Watermark Sources  7 434

•  3D Designer  10 661

•  Sik Screen Capture  7 980

•  Patch Maker  8 190

•  Айболит (remote control)  8 242

•  ListBox Drag & Drop  7 052

•  Доска для игры Реверси  100 527

•  Графические эффекты  8 315

•  Рисование по маске  7 694

•  Перетаскивание изображений  6 298

•  Canvas Drawing  6 671

•  Рисование Луны  6 594

•  Поворот изображения  5 742

•  Рисование стержней  4 681

•  Paint on Shape  3 382

•  Генератор кроссвордов  4 355

•  Головоломка Paletto  3 506

•  Теорема Монжа об окружностях  4 317

•  Пазл Numbrix  2 792

•  Заборы и коммивояжеры  3 733

•  Игра HIP  2 511

•  Игра Go (Го)  2 511

•  Симулятор лифта  2 909

•  Программа укладки плитки  2 334

•  Генератор лабиринта  3 069

•  Проверка числового ввода  2 565

•  HEX View  2 973

 
скрыть

  Форум  

Delphi FAQ - Часто задаваемые вопросы

| Базы данных | Графика и Игры | Интернет и Сети | Компоненты и Классы | Мультимедиа |
| ОС и Железо | Программа и Интерфейс | Рабочий стол | Синтаксис | Технологии | Файловая система |



Delphi Sources

Доступ к нетипизированному файлу



Вы можете организовать доступ к файлу "без определенного типа" следующим образом:


var 
  MyFile : file;
begin
  assign(MyFile,Filename);
  reset(MyFile,1);
  {для записи}
  Blockwrite(MyFile,item,sizeof(item));
  {для чтения}
  BlockRead(MyFile,item,sizeof(item));
  close(MyFile);
end;

Имейте в виду, что для чтения/записи нетипизированного файла необходимо использовать функции blockread и blockwrite, т.к. для использования нормальных функций Read/Write компилятору необходимо знать формат файла.








Copyright © 2004-2026 "Delphi Sources" by «SiteAnalyzer». Delphi World FAQ

Группа ВКонтакте