Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.12.2008, 18:19   #1
sting
Форумчанин
 
Аватар для sting
 
Регистрация: 03.07.2008
Сообщений: 114
По умолчанию Вывод данных из игр в прогу на Делфи

Здравствуйте!!!
Товарищи меня заинтересовала одна весчь!

Просто захотелось чёт сделать интересное!

Играю в WOW(World of Warcraft) (когда есть свободное время - жаль его почти нет!)

Так вот! Сам клиент является оболочкой, куда выводятся данные персонажа и других пользователей, перемещение их и т.д. с помощью обмена пакетов данных (сервер - клиент)

А как можно перехватить эти данные с сервера (ну или параллельно взять их от туда) и вывести в делфи (в программу или в чёт ещё!)

Я имею ввиду допустим программа -

Деньги:
Жизни:
т.д.:

Она выводит колличество денег, жизни, и других значений!

Вот через Армани значения эти найти можно! А как это всё реализовать в Делфи??

Подскажите плиз, посоветуйте что нить!
Люди гибнут за МЕТАЛ!!!

Последний раз редактировалось sting; 08.12.2008 в 18:24.
sting вне форума Ответить с цитированием
Старый 08.12.2008, 18:29   #2
Dr.Badnezz
Ученик
Форумчанин
 
Регистрация: 19.09.2008
Сообщений: 119
По умолчанию

Сайт chemax.ru тебе должен помочь!
Dr.Badnezz вне форума Ответить с цитированием
Старый 08.12.2008, 19:13   #3
sting
Форумчанин
 
Аватар для sting
 
Регистрация: 03.07.2008
Сообщений: 114
По умолчанию

Я нашёл там пару статей, которые я думаю мне помогут, но вод программу тренера на делфе сделать так и не смог!

http://chemax.ru/articles/trainer_delphi_api_1.php

вот ссылка на статью товарищи посмотрите - что в коде не так??
Люди гибнут за МЕТАЛ!!!
sting вне форума Ответить с цитированием
Старый 08.12.2008, 19:14   #4
sting
Форумчанин
 
Аватар для sting
 
Регистрация: 03.07.2008
Сообщений: 114
По умолчанию

может кто нить сможет мне поподробней описать эту статью, буду благодарен очень!
Люди гибнут за МЕТАЛ!!!
sting вне форума Ответить с цитированием
Старый 09.12.2008, 00:06   #5
Патрон
Форумчанин
 
Аватар для Патрон
 
Регистрация: 07.03.2008
Сообщений: 151
По умолчанию

привет всем! sting, я в нашей локалке держу сервер WoW'а, у меня парни делали нечто похожее, а именно трейнеры
смысл работы прог такое:
1. вводится IP сервера (можешь прописать в коде или кинуть на Edit)
2. указываешь путь клиента (пример C:\Games\WoW\Launcher.exe)
3. кидаешь на форму таймер которым будешь определять скорость передачи данных, общее время подключения... после такой "разъяснительной работы" от тебя требуется приостановить клиент WoW и в это время юзать своей прогой сервер, как ты узнал интересующие тебя данные - возобновляешь работу клиента игры...


З.Ы.Ы.
не стану говорить код прог какими ломается сервер, т.к. на офф сайте (к примеру) такое не приветствуется и думаю врядли такие действия кому-то из админов понравятся...

ОФФТОП
один умелец у нас вообще сделал себя ГМ'ом о_О
ганкнул БД и поставил себе права)
Патрон вне форума Ответить с цитированием
Старый 09.12.2008, 15:30   #6
sting
Форумчанин
 
Аватар для sting
 
Регистрация: 03.07.2008
Сообщений: 114
По умолчанию

хм.... монстры....

Да я не ломать собрался...

вообще как бы курсач!!!

Дело в том что - хочу начать с малого с вывода информации! А потом и можно сделать БОТА! канечно полноценного не смогу! Но мож для битвы с одним противником и осилю за пол года то!

Слушай а эмулятор если ВОВки разобрать на болтики и винтики - ценное чтонить получу??)))


меня больше правда интересует как вывести это значение в делфи!


вот мне тут человечек умный на другом форуме подсказал с кодом,

Код:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;
   const
 Offset='6F71C7B8';
var
  Form1: TForm1;

 Value:array [0..255] of char;
 Wnd: HWND;
 ThreadId, ProcessId, Hdl: Cardinal;
 BytesRead: Cardinal;

implementation

{$R *.dfm}
 begin
// окно игры
 Wnd := FindWindow(nil, 'Название окна игры');
// id процесса
 ThreadId := GetWindowThreadProcessId(Wnd, @ProcessId);
// открываем процесс с правами записи
 Hdl := OpenProcess(PROCESS_ALL_ACCESS, False, ProcessId);
// читаешь по адресу

// выводишь

// закрываешь процесс
 CloseHandle(hdl);
 ReadProcessMemory(Hdl,Pointer(Offset),  @Value, 4 , BytesRead);


end.
я попытался - но выбивает ошибку! в чём проблема?? где я ошибся?? кста ошибка вот на эту строчку:

Цитата:
ReadProcessMemory(Hdl,Pointer(Offse t), @Value, 4, BytesRead);

ошибка вот:
Цитата:
[Error] Unit1.pas(42): Invalid typecast
Люди гибнут за МЕТАЛ!!!
sting вне форума Ответить с цитированием
Старый 11.12.2008, 14:33   #7
sting
Форумчанин
 
Аватар для sting
 
Регистрация: 03.07.2008
Сообщений: 114
По умолчанию

Товарищи ну памагите плиз!
Блин весь инет уже облазил рускоязычный!
Блин не чё не получаеться
Люди гибнут за МЕТАЛ!!!
sting вне форума Ответить с цитированием
Старый 16.12.2008, 21:53   #8
Somebody
Участник клуба
 
Регистрация: 08.10.2007
Сообщений: 1,185
По умолчанию

  • const Offset=$6F71C7B8;
  • Сначала надо ReadProcessMemory, а потом CloseHandle
Somebody вне форума Ответить с цитированием
Старый 20.12.2008, 21:31   #9
sting
Форумчанин
 
Аватар для sting
 
Регистрация: 03.07.2008
Сообщений: 114
По умолчанию

во пошло всё! супер! хм а как это значение вывести , ну допустим в лэйбл?
пробовал но не получается
Люди гибнут за МЕТАЛ!!!
sting вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помоги плиз! Срочно нужно накодить прогу в делфи opolo13 Помощь студентам 3 14.03.2010 19:24
Вывод данных в Excel Novi4ek Помощь студентам 3 22.05.2008 11:32
табличный вывод данных zatoichi Общие вопросы Delphi 1 28.03.2008 08:23
Помогите дописать прогу на делфи fox7 Помощь студентам 3 16.06.2007 23:44