Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Узнать адрес процедуры [D6]

DDA © (2004-07-11 00:58:00)
Подскажите как можно узнать адрес процедуры например Memo1.clear

p:pointer;
begin
p:=@Memo1.Clear;// не работает

попробывал через асм - получил адрес,но не тот

P.S. Только не спрашифайте зачем мне это надо

Rouse_ (2004-07-11 10:51:00) [1]
Только так, и никак иначе...
var Form1: TForm1; P: Pointer; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin if P <> nil then TMemo(P^).Clear; end; procedure TForm1.FormCreate(Sender: TObject); begin P := @Memo1; end;

См: [12] Anatoly Podgoretsky © (11.07.04 10:28)

> [3] Palladin © (11.07.04 01:12)
:))

Anatoly Podgoretsky (2004-07-11 10:28:00) [2]
p:=@Memo1.Clear;// не работает

Clear не процедура, а метод КЛАССА, у тебя же получается метод объекта, а такого просто нет.

Palladin (2004-07-11 02:01:00) [3]
Вообще манера вопроса выглядит как: дайте денег! на что не скажу, дайте!

> DDA ©

Вы бы дали?

Palladin (2004-07-11 01:58:00) [4]
Созданный объект не содержит методов как таковых, только поля и ссылку на VMT где и хранится для каждого класса информация о методах. Ответ, как должно быть, я дал тебе в первом же посте. Хочешь подробностей VMT + F1

Mim1 (2004-07-11 01:53:00) [5]
Было уже, и не раз.

KilkennyCat (2004-07-11 01:39:00) [6]

> DDA © (11.07.04 01:32) [7]

Мы ж не роботы... у нас есть эмоции. Извините, если что.

DDA (2004-07-11 01:32:00) [7]
Можно обсуждать здесь вопрос топика а не что-то другое(ваши мысли или ещё что-то)(на это есть потрепаться)

Если есть ответ на поставленый вопрос - давайте по существу.

Почему вы Palladin думаете что я не могу ошибаться и думать что оно должно работать,для этого я пришел сюда чтоб узнать истину

P.S. написал чтоб не спрашивали зачем мне это,дак спросили про другое,неужели нельзя без этого

KilkennyCat (2004-07-11 01:25:00) [8]
Удалено модератором
Примечание: Оффтоп...

Marser (2004-07-11 01:22:00) [9]
Удалено модератором
Примечание: Оффтоп...

KilkennyCat (2004-07-11 01:18:00) [10]
Удалено модератором
Примечание: Оффтоп...

Palladin (2004-07-11 01:12:00) [11]
Удалено модератором: LMD Lock

DDA (2004-07-11 01:10:00) [12]

> Palladin © (11.07.04 01:03) [1]
> А почему оно должно работать?

ну я и спрашиваю как узнать адрес,а не почему

Palladin (2004-07-11 01:03:00) [13]
А почему оно должно работать?
p:=@TMemo.Clear;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »