Скачать: CL | DM;

Как передать объект в виде Integer, а затем это число ..   Найти похожие ветки 

← →
Kolan ©   (2006-10-16 21:06) [0]

обратно привратить в обект
ТЕ
procedure DOSmth;
var
 I: Integer;
 Obj: TObject;
begin
 Obj := TObject.Create;
 I := ObjectToInteger(Obj);
 ShowMessgae(IntegerToObject(I).ClassName);
end;
ЗЫ
 Здравствуйте, :)

---

← →
wl ©   (2006-10-16 21:21) [1]

I := Integer(Obj);
ShowMessgae(TObject(I).ClassName);

---

← →
Kolan ©   (2006-10-16 21:27) [2]

Угу. вышло

---

← →
Anatoly Podgoretsky ©   (2006-10-16 22:54) [3]

Еще короче
ShowMessgae(TObject.Create.ClassName);

---

← →
Kolan ©   (2006-10-16 22:56) [4]

> Еще короче
> ShowMessgae(TObject.Create.ClassName);
>

Но не поможет мне понять как передать ссылку на объект через PostMessage :)

---

← →
wl ©   (2006-10-16 23:19) [5]

если передавать будешь в другое приложение, тогда адрес объекта будет недействительным.

---

← →
Kolan ©   (2006-10-16 23:20) [6]

> если передавать будешь в другое приложение, тогда адрес
> объекта будет недействительным.

Понятно. Уже усё получилось, еще раз благодарю.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c