Размещение объекта в памяти Опции

[Bokul]

Объект TObject занимает в памяти 8 байт - сума двух longint, т.е. места для методов не резервируется. Мне интересно, как и где в памяти размещаются методы объектов и куда я обращаюсь, вызывая метод по ссылке - po^.method?

type
    PTobject=^TObject;
    TObject=object
      i,i2:longint;
      procedure method;
    end;
procedure TObject.method;
begin
 i:=4;
end;
var mem:longint;
    po:PTobject;
    p:pointer;
    pi:^longint;
begin
mem:=memavail;
new(po);
po^.method;{!!!!!!!!!!!!!!!!!!сдесь}
p:=po;
pi:=p;
writeln(pi^);
writeln('Difference: ',mem-memavail);
readln;
end.

[Bokul]

Можно чуть-чуть придраться?

известно, какой метод и какого объекта будет вызываться

Т.е. известно адреса методов в сегменте?

подставляет адрес этого метода (размещенного в сегменте кода) напрямую...

Подставляет куда?

volvo, не мог бы ты детально описать, что происходит на уровне памяти в моем коде? Извиняюсь за свою недоходчивость...

Сообщение отредактировано: Bokul - 2.12.2006 4:55

[Lapp]

> Подставляет куда?
Да уж, действительно придираешься.. Просто не совсем точная формулировка. Ничего не подставляется, адрес сразу в коде. Поскольку для адреса метода не нужно заводить сам объект (экземпляр), то адрес его уже известен на этапе компиляции (линковки, запуска..). Трактуй это просто как обычный код.