Регистрация Главная Пользователи Все разделы прочитаны
Сообщения за день Справка Регистрация
Навигация
Zhyk.org LIVE! Реклама на Zhyk.org Правила Форума Награды и достижения Доска "почета"

Проблемы с нахождением ника персонажа [Delphi]

-

Общение разработчиков

- Программирование для Perfect World, общение и обсуждене разработок

Ответ
 
Опции темы
Старый 25.09.2013, 03:02   #1
 Пехотинец
Аватар для sedrik1992
 
sedrik1992 никому не известный тип
Регистрация: 03.02.2013
Сообщений: 60
Популярность: 10
Сказал(а) спасибо: 12
Поблагодарили 25 раз(а) в 12 сообщениях
 
По умолчанию Проблемы с нахождением ника персонажа [Delphi]

Ребят, разобрался. Может кому понадобится:

Цитата:
var
Form1: TForm1;
KlientWindow:HWND; //Handle клиента
ProcessId:Integer;
hProcess:Integer; //Идентификатор объекта

const
ba=$C38B6C; //Базовый адрес
pName= $688; //Оффсет имени персонажа

procedure TForm1.Button1Click(Sender: TObject);
var
NM: String;
WNM, PF: DWord;
TNM : array [0..49] of widechar;


begin

KlientWindow := FindWindow(nil, PChar('Perfect World')); //Handle клиента через название окна
GetWindowThreadProcessId(KlientWindow,@ProcessId); //Получаем Pid.
hProcess := OpenProcess(PROCESS_ALL_ACCESS,False,ProcessId); //Открываем процесс с полным доступом

ReadProcessMemory (hProcess, Pointer(ba), @WNM, 4, PF);
ReadProcessMemory (hProcess, Pointer(WNM+$1C), @WNM, 4, PF);
ReadProcessMemory (hProcess, Pointer(WNM+$34), @WNM, 4, PF);
ReadProcessMemory (hProcess, Pointer(WNM+pName), @WNM, 4, PF);
ReadProcessMemory (hProcess, Pointer(WNM+$0), @TNM, 100, PF);


Результат:= WideCharToString(TNM);

end;

________________
World ID | Кубометр

Последний раз редактировалось sedrik1992; 26.09.2013 в 14:11. Причина: Дополнил код
  Ответить с цитированием
Старый 26.09.2013, 10:43   #2
-= Мастер Света =-
 Рыцарь-капитан
Аватар для Ginrey
 
Ginrey троюродный дядя Чака НоррисаGinrey троюродный дядя Чака НоррисаGinrey троюродный дядя Чака НоррисаGinrey троюродный дядя Чака НоррисаGinrey троюродный дядя Чака НоррисаGinrey троюродный дядя Чака НоррисаGinrey троюродный дядя Чака НоррисаGinrey троюродный дядя Чака НоррисаGinrey троюродный дядя Чака НоррисаGinrey троюродный дядя Чака НоррисаGinrey троюродный дядя Чака Норриса
Регистрация: 14.06.2012
Сообщений: 511
Популярность: 7566
Сказал(а) спасибо: 4
Поблагодарили 181 раз(а) в 88 сообщениях
 
По умолчанию Re: Проблемы с нахождением ника персонажа [Delphi]

ты сам понял что сделал?
переменная hProcess не задана
Процесс не найден и не открыт
и откуда ты пытаешься считать тогда
________________
Хотите как то отблагодарить за помощь?
Не стесняйтесь нажимайте "Спасибо"

Делаю программы на заказ, по всем вопросам в скайп: Ginrey2
  Ответить с цитированием
Старый 26.09.2013, 13:49   #3
 Пехотинец
Аватар для sedrik1992
 
sedrik1992 никому не известный тип
Регистрация: 03.02.2013
Сообщений: 60
Популярность: 10
Сказал(а) спасибо: 12
Поблагодарили 25 раз(а) в 12 сообщениях
 
По умолчанию Re: Проблемы с нахождением ника персонажа [Delphi]

Цитата:
Сообщение от GinreyПосмотреть сообщение
ты сам понял что сделал?
переменная hProcess не задана
Процесс не найден и не открыт
и откуда ты пытаешься считать тогда

Я не стал выкладывать полностью код, главное написал. Сейчас Дополню.
________________
World ID | Кубометр
  Ответить с цитированием
Старый 26.09.2013, 14:32   #4
 Разведчик
Аватар для Gorrilaz
 
Gorrilaz скоро будет известенGorrilaz скоро будет известенGorrilaz скоро будет известенGorrilaz скоро будет известен
Регистрация: 23.06.2009
Сообщений: 38
Популярность: 392
Сказал(а) спасибо: 7
Поблагодарили 8 раз(а) в 2 сообщениях
 
По умолчанию Re: Проблемы с нахождением ника персонажа [Delphi]

Обсуждалось...
________________
Три рубля много, спасибо хватит!
Запуск и переименование окон PW
  Ответить с цитированием
Старый 26.09.2013, 16:13   #5
 Пехотинец
Аватар для sedrik1992
 
sedrik1992 никому не известный тип
Регистрация: 03.02.2013
Сообщений: 60
Популярность: 10
Сказал(а) спасибо: 12
Поблагодарили 25 раз(а) в 12 сообщениях
 
По умолчанию Re: Проблемы с нахождением ника персонажа [Delphi]

Цитата:
Сообщение от GorrilazПосмотреть сообщение
Обсуждалось...

Можно поинтересоваться, что именно обсуждалось?
ты ссылку кинул на абсолютно левую тему
________________
World ID | Кубометр
  Ответить с цитированием
Старый 27.09.2013, 12:14   #6
 Разведчик
Аватар для Gorrilaz
 
Gorrilaz скоро будет известенGorrilaz скоро будет известенGorrilaz скоро будет известенGorrilaz скоро будет известен
Регистрация: 23.06.2009
Сообщений: 38
Популярность: 392
Сказал(а) спасибо: 7
Поблагодарили 8 раз(а) в 2 сообщениях
 
По умолчанию Re: Проблемы с нахождением ника персонажа [Delphi]

Цитата:
Сообщение от sedrik1992Посмотреть сообщение
Можно поинтересоваться, что именно обсуждалось?
ты ссылку кинул на абсолютно левую тему

Видимо не ту ссылку вставил, прошу прощения.

Вот тут вот
________________
Три рубля много, спасибо хватит!
Запуск и переименование окон PW
  Ответить с цитированием
Ответ

Опции темы

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

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проблемы с Auto-Potter'oм Delphi 7(нажатие клавиш). JeckAtlas Общение разработчиков 11 05.08.2013 00:21
[Помогите!] Проблемы на релиз пила 1.3.9 igormaster Вопросы и ответы, обсуждения 2 04.02.2011 22:36
[Обсуждение] Возможно ли смена ника персонажа? Sardge Общение и обсуждение Perfect World 11 16.09.2010 17:02

Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 19:42.

Пишите нам: [email protected]
Copyright © 2024 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net