|
|||||||
| Программинг Форум для тем связанных с программированием |
|
|
Опции темы | Опции просмотра |
20.10.2015, 02:37
|
#5 |
|
Пользователь
Регистрация: 29.09.2010
Сообщений: 34
Сказал Спасибо: 18
Имеет 1 спасибку в 1 сообщении
 |
ничего не понятно все равно
Код:
procedure test;stdcall;
var
lpStartAddress:Pointer;
begin
lpStartAddress:=GetProcAddress(GetModuleHandle('dsetup.dll'), '??0Cdsetup@@QAE@XZ');
//lpStartAddress:=GetProcAddress(GetModuleHandle('dsetup.dll'), '??0Cdsetup@@QAE@XZ')+$8190; это не работает делфи ругается
ShowMessage (IntToStr(Integer(lpStartAddress)));
end;
в итоге тут я получаю 0
Последний раз редактировалось controller, 20.10.2015 в 04:26. |
|
|
Древовидный вид