Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.03.06;
Скачать: [xml.tar.bz2];

Вниз

Магнитные бури???   Найти похожие ветки 

 
Ji ©   (2005-02-18 22:06) [0]

Вариант 1:

type
 re=record
   a:byte;
 end;
var
 v:re;
 f:file of re;


Вариант 2:

type
 re=record
   a:integer;
 end;
var
 v:re;
 f:file of re;


Вариант 3:

type
 re=record
   a:byte;
   b:integer;
 end;
var
 v:re;
 f:file of re;


Для каждого из трех вариантов выполняем следующий код:

AssignFile(f,"somefile");
ReWrite(f);
Write(f,v);
CloseFile(f);


Внимание вопрос!
Полученный в результате файл "somefile" имеет следующий размер:
для варианта 1 - 1 байт;
для варианта 2 - 4 байта;
для варианта 3 - 8 байт; (!!!) причем три "лишних" байта заполняются мусором.
Subj?


 
Sam Stone ©   (2005-02-18 22:13) [1]

Только первый вариант смущает. Дельфи записи делает кратными 4 байтам (32 разряда) для скорости или удобства работы с памятью (точно не помню).
Возможно, в первом варианте файл воспринимается как file of byte.
Чтоб не было "магнитных бурь" (гы-гы-гы :))) надо использовать packed record.


 
panov ©   (2005-02-18 22:24) [2]

Поле "Тема вопроса" не оформлено.



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

Форум: "Основная";
Текущий архив: 2005.03.06;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.057 c
1-1109089449
Серьезный Сэм
2005-02-22 19:24
2005.03.06
TSpinEdit


3-1107253279
Vadim
2005-02-01 13:21
2005.03.06
Запрос с параметрами


14-1108558723
Antonn
2005-02-16 15:58
2005.03.06
Возможные проблеммы с вызовом IPHLPAPI.DLL


4-1103180482
tradakad
2004-12-16 10:01
2005.03.06
Получение иконки приложения


4-1106136207
YV
2005-01-19 15:03
2005.03.06
Запрет принудительного завершения процеса





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский