Текущий архив: 2006.09.24;
Скачать: 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 вся ветка
Текущий архив: 2006.09.24;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.033 c
