Есть ли в Delphi аналоги паскалевских seg и ofs?
Есть ли в Delphi аналоги паскалевских функции seg и ofs?
Цитата:
Originally posted by paSHOCK
Есть ли в Delphi аналоги паскалевских функции seg и ofs?
Есть ли в Delphi аналоги паскалевских функции seg и ofs?
var
VAL : integer;
Ptr : pointer;
К примеру, у тебя есть переменная VAL и ты хочешь
узнать ее адрес
Ptr:=addr(VAL)
-------------------
В Windows нет больше сегмента/смещения. И по
значению адреса ты можешь напрямую путем преобра-
зования типа делать свой адрес
VAL:=1123123;
Ptr:=pointer(VAL);
или так
Ptr:=pointer(1123123);
Пока!