Главная страница
    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.048 c
9-1102166895
Макс
2004-12-04 16:28
2005.03.06
Glscene


4-1106297738
Dot
2005-01-21 11:55
2005.03.06
ToolBar for IE


14-1108491043
Agent13
2005-02-15 21:10
2005.03.06
MSN и Delphi


11-1090839820
Юрий Ж.
2004-07-26 15:03
2005.03.06
А че бобик сдох?


1-1108893154
XfroSt
2005-02-20 12:52
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский