Page 1 of 1

delphi seteventproc question

Posted: 29.03.2015 22:31
by 980333

Code: Select all

procedure eventMapMessage(ID: Cardinal; centerX, centerY: Integer);
begin
  xMap := centerX;
  yMap := centerY;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
 script.SetEventProc(TPacketEvent.evMapMessage,@eventMapMessage);
end;
but this code don't work,8 years i have never used Delphi
and how get mount/dismount static

Re: delphi seteventproc question

Posted: 31.03.2015 17:06
by Vizit0r
visually all is ok.
what's you mean "don't work" ?

and about static write question normally.

Re: delphi seteventproc question

Posted: 31.03.2015 20:25
by 980333
sorry,i want get mount/dismount status,not static
on delphi i call SetEventProc function after,in game click Treasure map,eventMapMessage function dont work

Re: delphi seteventproc question

Posted: 31.03.2015 20:35
by 980333
in delphi,i SetEventProc after,fster useobject Treasure map, eventMapMessage dont work,second useobject Treasure map,eventMapMessage can work,but SetEventProc after,in game click terasure map,eventMapMessge dont work

Re: delphi seteventproc question

Posted: 01.04.2015 10:35
by Vizit0r
980333 wrote:sorry,i want get mount/dismount status,not static
check HorseLayer - if nil - mean you have no mount.


about event - give me char for test