Вопрос на засыпку

← →
Kozhanov © (2002-05-23 18:15) [0]

Господа, кто знает как Delphi
представляет в памяти машины следующие структуры :

1. array[1..2] of integer;
2. TMyRecord = record
mrField1 : Integer;
mrField2 : String;
end;
Мне этот вопрос жутко интересен ! Какие будут варианты ???

← →
MBo © (2002-05-23 18:26) [1]

1.
Addr0: array[1]
Addr0+4: array[2]
2.
Addr0: mrfield1
Addr0+4: mrField2 (pointer), 4 байта

← →
Kozhanov © (2002-05-23 18:39) [2]

> MBo
Спасибо.

А можно ли сделать вот какую штуку :
"Самому" сформировать структуру типа запись и заставить
Delphi воспринимать её за свою родную (Например,
"самому" сделать record и обмануть Delphi ) ???

← →
wicked © (2002-05-23 18:47) [3]

2 Kozhanov ©
как это - самому?... указать, что по какому смещению лежит?...

← →
Kozhanov © (2002-05-23 18:50) [4]

> wicked
Ага.
Вот такой вот хакерский приём...

да ничего он не хакерский... просто надо знать, сколько байт в памяти берёт каждый тип - в хелпе всё прекрасно расписано...
единственное но - delphi любит выравнивать поля записей по границе слов/двойных слов ради более быстрого к ним доступа... например:

two = record one: real; //6 bytes two: real; //6 bytes end;

по идее структура должна занимать 12 байт, но фактически она может занять все 16...
вот если это надо обойти, применяется слово packed... тогда delphi ничего не выравнивает...
а если надо точно указать смещения, просто используй директиву packed и пустые поля-болванки для заполнения промежутков между полями данных...
напоследок: д(т)ерзай и дружи с sizeof... ;)

1) a:array[1..4] of byte
b:integer absolute a;
a[3]:=2;
qqq:=b;

2) ta=record
a1:integer;
a2

Вопрос на засыпку Найти похожие ветки