|
Программинг Форум для тем связанных с программированием |
25.01.2011, 22:04
|
#61
|
Местный
Регистрация: 23.09.2009
Сообщений: 1,232
Сказал Спасибо: 119
Имеет 172 спасибок в 134 сообщенях
|
Stored := MyObj; //прочитать значение с off_40A798
каким образом мы читаем с 40A798 этой строкой???
//я них*я непонимат(
__________________
Начало.
|
|
|
25.01.2011, 22:09
|
#62
|
Рыцарь
Регистрация: 26.06.2009
Сообщений: 2,433
Сказал Спасибо: 154
Имеет 692 спасибок в 426 сообщенях
|
Цитата:
Сообщение от supernewbie
//я них*я непонимат(
|
он "в своем приложении", это некатит.
Код:
procedure MyProc;
var //учимся НЕ юзать глобальные переменные
adr:pointer;
objaddr:pointer;
begin
adr:=pointer( getmodulehandle('project25.exe') + $A798);
obaddr:=pointer(adr^);
messagebox(0,PChar(IntToHex(obaddr)),'',0);
end;
так скомпилит?
__________________
Шожиделать.. ботить хочется..
|
|
|
За это сообщение destructor нажился спасибкой от:
|
|
25.01.2011, 22:14
|
#63
|
Местный
Регистрация: 23.09.2009
Сообщений: 1,232
Сказал Спасибо: 119
Имеет 172 спасибок в 134 сообщенях
|
[Error] path.dpr(25): There is no overloaded version of 'IntToHex' that can be called with these arguments
__________________
Начало.
|
|
|
25.01.2011, 22:18
|
#64
|
Рыцарь
Регистрация: 26.06.2009
Сообщений: 2,433
Сказал Спасибо: 154
Имеет 692 спасибок в 426 сообщенях
|
даже я понял что значит эта строчка.
вот так надо: messagebox(0,PChar(IntToHex(obaddr, 8)),'',0);
__________________
Шожиделать.. ботить хочется..
|
|
|
За это сообщение destructor нажился спасибкой от:
|
|
25.01.2011, 22:19
|
#65
|
Местный
Регистрация: 23.09.2009
Сообщений: 1,232
Сказал Спасибо: 119
Имеет 172 спасибок в 134 сообщенях
|
да нихрена)
тоже самое)
Добавлено через 31 секунду
cardinal(objaddr) - работает, но...
__________________
Начало.
Последний раз редактировалось supernewbie, 25.01.2011 в 22:19.
Причина: Добавлено сообщение
|
|
|
25.01.2011, 22:20
|
#66
|
Рыцарь
Регистрация: 26.06.2009
Сообщений: 2,433
Сказал Спасибо: 154
Имеет 692 спасибок в 426 сообщенях
|
а так?
messagebox(0,PChar(IntToHex(integer(obaddr), 8])),'',0);
Добавлено через 28 секунд
Цитата:
Сообщение от supernewbie
но...
|
что "но"?
__________________
Шожиделать.. ботить хочется..
Последний раз редактировалось destructor, 25.01.2011 в 22:20.
Причина: Добавлено сообщение
|
|
|
За это сообщение destructor нажился спасибкой от:
|
|
25.01.2011, 22:23
|
#67
|
Местный
Регистрация: 23.09.2009
Сообщений: 1,232
Сказал Спасибо: 119
Имеет 172 спасибок в 134 сообщенях
|
по идее таким образом можно и без ^ обойтись... ну ладно, давай уже дальше
__________________
Начало.
|
|
|
25.01.2011, 22:24
|
#68
|
Рыцарь
Регистрация: 07.03.2009
Сообщений: 9,139
Сказал Спасибо: 70
Имеет 2,820 спасибок в 1,735 сообщенях
|
__________________
L2Ext - project closed.
|
|
|
25.01.2011, 22:24
|
#69
|
Рыцарь
Регистрация: 26.06.2009
Сообщений: 2,433
Сказал Спасибо: 154
Имеет 692 спасибок в 426 сообщенях
|
Цитата:
Сообщение от supernewbie
по идее таким образом можно и без ^ обойтись..
|
нельзя.
угадали адрес переменной: 0040A798
по этому адресу лежит адрес обьекта:
Код:
Project25.exe:0040A794 dd 0
Project25.exe:0040A798 dd $0041080C //нужно это
Project25.exe:0040A79C dd 0
Project25.exe:0040A7A0 dd 0
нам надо сделать эту хрень ^ , учи указатели.
выкладывай длл+ехе, погляжу что получилось
__________________
Шожиделать.. ботить хочется..
Последний раз редактировалось destructor, 25.01.2011 в 22:31.
|
|
|
За это сообщение destructor нажился спасибкой от:
|
|
25.01.2011, 22:27
|
#70
|
Местный
Регистрация: 23.09.2009
Сообщений: 1,232
Сказал Спасибо: 119
Имеет 172 спасибок в 134 сообщенях
|
хрень какая-то получилась
__________________
Начало.
|
|
|
Ваши права в разделе
|
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
|
|
|
Часовой пояс GMT +4, время: 07:40.
|
|