L2PacketHack 3.5.x

[J-Fobos]

NLObP, можешь сделать это ? Чтоб строка задавалась в опциях, а inject.dll читал этот параметр с option.ini

[NLObP]

Сообщение от J-Fobos

Чтоб строка задавалась в опциях, а inject.dll читал этот параметр с option.ini

Подробнее распиши, что именно надо сделать.

Добавлено через 2 минуты

Сообщение от regged

а можно указать в Packetsxxx.ini например новый параметр, чтоб из другого Id текста взял данные как из SkillId, ItemsId и т.д?

Это надо в коде прописать, чтобы вызывалась это подпрограмма.
Выложи пример файла MapId.ini и пример пакета в котором это вызывается.

[regged]

NLObP, У тебя какая версия аиона если я правильно понял ты начал заниматся ею тоже? Вот что у нас есть незнаю пригодится или нет? Версия у меня 2.1

[NLObP]

Сообщение от regged

У тебя какая версия аиона если я правильно понял ты начал заниматся ею тоже? Вот что у нас есть незнаю пригодится или нет? Версия у меня 2.1

У меня Айона нет. Делаю из разных сборок java серверов. Нужны логи пакетов. Также желательна ссылка на исходники сервака айон с версией 2.1.

PS: подключил файлы ClassIdAion.ini, ItemsIdAion.ini, SkillsIdAion.ini для разбора пакетов, функции соответственно Get.ClassIdA, Get.FUNC01A, Get.SkillA

[J-Fobos]

В юнит uSettingsDialog добавить еще один TEdit, значение которого будет сохранятся в Options.ini
В юнит uMainReplacer добавить код alexteam. Только вместо 'hervam' считывать строку из Options.ini
Ну и в inject.dpr надо будет поправить функцию ConnectHookProc, перед строкой apph:=FindWindow('TfMainReplacer',nil); читать значение параметра из Options.ini и использовать этот параметр вместо 'TfMainReplacer'.

[Torbins]

Как там дела с пакетами Айона? Я готов помочь.
P.S. В какой версии делфей лучше всего компилировать пакетхак?

[NLObP]

Никак не получается сделать. Ткните носом как правильно.

Есть

      procedure TfMainReplacer.CreateParams(var Params: TCreateParams);     
      begin
        inherited CreateParams(Params);
        Params.WinClassName := 'hervam'; //любаярандомнаястрочка
      end;

Делаю

      procedure TfMainReplacer.CreateParams(var Params: TCreateParams);     
var
  str: string;
begin
  inherited CreateParams(Params);
  str:='hervam';
  Params.WinClassName := str; //<-error
end;

Вылетает ошибка

[DCC Error] uMainReplacer.pas(381): E2010 Incompatible types: 'Array' and 'string'

Делаю так

procedure TfMainReplacer.CreateParams(var Params: TCreateParams);
var
  str: array[0..63]of Char;
begin
  inherited CreateParams(Params);
  //str:='hervam';
  Params.WinClassName := str; //<-error
end;

[DCC Error] uMainReplacer.pas(381): E2008 Incompatible types

Хотя в сурсах WinClassName определена как

WinClassName: array[0..63] of Char; // Имя класса окна

Как сделать правильно?

Так правильно будет?

  Move(str, Params.WinClassName, SizeOf(str));

[alexteam]

move(str[1],Params.WinClassName, length(str));

естественно str : ansistring длинной меньше 64 байтоф.

[xkor]

Сообщение от alexteam

естественно str : ansistring длинной меньше 64 байтоф.

учитывая что:

Сообщение от NLObP

WinClassName: array[0..63] of Char; // Имя класса окна

скорее всётаки string а не ansistring, ну и соответственно не length(str), а length(str)*2 если дельфи 2009+

[alexteam]

xkor, http://i.piccy.info/i5/83/81/1308183/Bezymiannyi.png