Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #7  
Старый 16.03.2011, 09:23
Аватар для Desprado
Desprado Desprado вне форума
Прохожий
 
Регистрация: 19.12.2010
Адрес: Украина
Сообщения: 7
Репутация: 10
По умолчанию

ну вот еще посоветовали
PHP код:
var
WndHndl:THandle;
buf:byte;
ipbuf,PID,hProcess,BytesCount:dword;
begin
WndHndl
:=findwindow('ElementClient Window',nil);
GetWindowThreadProcessId(WndHndl, @PID);
hProcess:=OpenProcess(PROCESS_ALL_ACCESSFalsePID);
if 
hProcess <> 0 then // Проверяем получен ли идентификатор объекта
try
ReadProcessMemory(hProcessptr(base_addr), @ipbufsizeof(ipbuf), BytesCount);
ReadProcessMemory(hProcessptr(ipbuf+$1C), @ipbufsizeof(ipbuf), BytesCount);
ReadProcessMemory(hProcessptr(ipbuf+$20), @ipbufsizeof(ipbuf), BytesCount);
ReadProcessMemory(hProcessptr(ipbuf+fly_offset), @bufsizeof(buf), BytesCount); 
__________________
точка
Ответить с цитированием
 


Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 03:08.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025