Бестиповые файлы: особенности: различия между версиями

Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
(Новая: == Ссылки == *Особенности языка: продвинутый уровень *[http://pascalabc.net/ru/bazovyie-osobennosti-yazyika-i-bibliotek.html Сайт PascalAB...)
 
Нет описания правки
 
Строка 1: Строка 1:
В отличие от Delphi, в бестиповые файлы можно непосредственно записывать (а затем и считывать) любые размерные данные, а также строки. Строка записывается в виде: байт длины, символы строки. Таким образом, в бестиповой файл можно записать максимум строку длиной в 255 символов.
<source lang="Delphi">var
  f: file;
  i: integer;
  r: real;
  s: string;
begin
  assign(f,'a.dat');
  rewrite(f);
  // Записываем в файл данные любых типов
  write(f,1,2.5,'Hello'); 
  close(f);
  reset(f);
  // Считываем эти данные из файла
  read(f,i,r,s);
  write(i,' ',r,' ',s);
  close(f);
end.</source>
== Ссылки ==
== Ссылки ==
*[[Особенности языка: продвинутый уровень]]
*[[Особенности языка: продвинутый уровень]]
*[http://pascalabc.net/ru/bazovyie-osobennosti-yazyika-i-bibliotek.html Сайт PascalABC.NET: Особенности языка]
*[http://pascalabc.net/ru/bazovyie-osobennosti-yazyika-i-bibliotek.html Сайт PascalABC.NET: Особенности языка]

Текущая версия от 22:23, 12 января 2010

В отличие от Delphi, в бестиповые файлы можно непосредственно записывать (а затем и считывать) любые размерные данные, а также строки. Строка записывается в виде: байт длины, символы строки. Таким образом, в бестиповой файл можно записать максимум строку длиной в 255 символов.

var 
  f: file;
  i: integer;
  r: real;
  s: string;

begin
  assign(f,'a.dat');
  rewrite(f);
  // Записываем в файл данные любых типов
  write(f,1,2.5,'Hello');  
  close(f);
  reset(f);
  // Считываем эти данные из файла
  read(f,i,r,s);
  write(i,' ',r,' ',s);
  close(f);
end.

Ссылки