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

Как объект передать через интовую переменную?   Найти похожие ветки 

← →
newbie2   (2006-09-07 12:27) [0]

интересует преобразование типов

iLink : integer;
myObject : TmyObject;
...
iLink := integer(@myObject);
...
myObject := TmyObject(? здесь как должно быть написано)

спасибо

---

← →
Zeqfreed ©   (2006-09-07 12:29) [1]

Pointer(iLink)

---

← →
Сергей М. ©   (2006-09-07 12:30) [2]

iLink : integer;
myObject : TmyObject;
...
iLink := integer(pointer(myObject));
myObject := TmyObject(pointer(iLink));

---

← →
Zeqfreed ©   (2006-09-07 12:32) [3]

Ой, действительно, в [2] правильный вариант :)
Я как-то не обратил внимания, что @myObject это будет косвенный указатель.

---

← →
default ©   (2006-09-07 12:37) [4]

эх, мастера громоздкого кода:)
var
 iLink : integer;
 myObject : TmyObject;
begin
 iLink := integer(myObject);
 myObject := TmyObject(iLink);
end;

проще надо быть

---

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

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



Память: 0.45 MB
Время: 0.026 c