CoderX :: Forums - Показать сообщение отдельно

supernewbie · 25.01.2011, 21:38

так так

otheri1:^integer;

adr:=getmodulehandle('project25.exe') + $A798;
otheri1:=@adr;

messagebox(0,PChar(IntToStr(Integer(otheri1^))),'' ,0);

4237208

PS где-то я уже видел это число

25.01.2011, 21:38	#52
supernewbie Местный Регистрация: 23.09.2009 Сообщений: 1,232 Сказал Спасибо: 119 Имеет 172 спасибок в 134 сообщенях	так так otheri1:^integer; adr:=getmodulehandle('project25.exe') + $A798; otheri1:=@adr; messagebox(0,PChar(IntToStr(Integer(otheri1^))),'' ,0); 4237208 PS где-то я уже видел это число __________________ Начало.