Показать сообщение отдельно
Старый 05.01.2008, 18:29   #5
Пользователь
 
Аватар для skymanrus
 
Регистрация: 28.12.2007
Сообщений: 54
Сказал Спасибо: 0
Имеет 40 спасибок в 10 сообщенях
skymanrus пока неопределено
По умолчанию

спасибо за пример rateg
но чёт в dll MessageBox(0,L"medved",L"preved",0); не пашет
я скрипт запускаю и ничего не происходит
а я так понял должно сообщение выскочить "medved preved" с кнопкой ок
ну это не так важно на самом деле

скажите а можно передать из dll файла переменные в L2PacketHack

к примеру есть такой код

в С++
Код:
//sample.c
#define UNICODE
#include <windows.h>
#define DLL_EXPORT __declspec(dllexport) __stdcall

int DLL_EXPORT FromClient(int i)
{
  int dda=133;
  return 56;
}

int DLL_EXPORT APIENTRY DllMain (int i )
{
    i=i+123;
    return 34;
}
а в L2PacketHack
Код:
//samplescript.txt
var
Res:variant; lib:Integer; timer1:TTimer;

procedure Init;
begin
timer1:=TTimer.Create(nil);
timer1.OnTimer:=@OnTimer;
timer1.enabled:=true; 
timer1.interval:=1000; 
lib:=loadLibrary('Project62.dll');
end;

procedure Free;
begin
FreeLibrary(lib);
timer1.Free;
end;

procedure OnTimer(Sender: TObject);  
begin
Res:=CallFunction(lib,'DllMain',1,[2]);
ShowMessage('!'+VarToStr(Res)+'!');
end;
begin
end.
эти два кода не к чему не ведут :(
переменные не передаются из dll

как передать при вызове dll значение переменной dda из dll в L2PacketHack ???

Добавлено спустя 23 часа 18 минут 16 секунд:
ну народ помогите плиз !!!
я не верю что здесь никто ничего не знает о подключении dll файлов :(
__________________
На людей сердишся, когда чувсивуешь, что их поступки важны. Ничего подобного я больше не чувствую...
skymanrus вне форума   Ответить с цитированием