public/published методы

Posted by maloy under Delphi, Архив

Altera

Вопрос в следующем:
Экспериментируя с вызовом методов, указатели которых находились в tList я обнаружил, что public и published методы всех экземпляров одного и того же класса (или объекта, не знаю, как правильно), не важно, выделена ли под них (экземпляры классов) память, или нет, имеют один и то-то же адрес, не равный Nil. Вот я и хочу, что-бы вы мне это объяснили, почему так происходит?

alexBlack

Обратите внимание на структуру:

  TMethod = record
    Code, Data: Pointer;
  end;

Для методов класса используется именно она.
Таким образом в TList придется хранить структуру или использовать два TList или хранить только адрес, а экземпляр подставлять потом.

type
   MyProc = procedure  of object;

   MyClass = class
      procedure test1;
   end;

procedure MyClass.test1;
begin
   ShowMessage('1');
end;

procedure TForm19.FormCreate(Sender: TObject);
var C:MyClass;
    M:TMethod;
begin
   C := MyClass.Create;
   try
      MyProc(M) := C.test1;  // сохраняется адрес метода и ссылка на экземпляр объекта

      MyProc(M);             // Вызов процедуры
   finally
      C.Free;
   end;
end;

Utkin

А почему собственно должно быть иначе? Это свойство ООП — каждый раз при создании объектов память выделяется только под поля (уже не помню как со свойствами). Делфи это компилятор и после компиляции код НЕ ИЗМЕНЯЕТСЯ, поэтому код всегда находится на одном месте. А методу пофигу какие данные обрабатывать и по идеи его можно наколоть и подсунуть вообще левые. Сделать же так Вы не можете не потому что не компилица, а потому что компилятор это отслеживает, теоретические же это вполне возможно (но глупо с точки зрения ООП).

тема на форуме от 2009 года

Похожие статьи

• Создать класс: морская волна
• Все экземпляры класса
• Пример класса для создания лога программы
• Test-Driven Development для Java (TDD, разработка через тестирование) на практике.
• Как получить ссылку на объект класса?
• Как отследить изменение Image в PictureBox
• Значок «new» к картинке
• Увеличение шрифта при наведении смещает текст
• Отличия Id и Class в CSS
• Перебор свойств класса и присвоение им значения в цикле