The 7.84 Delphi SDK for creating Whole Programs or DLL Plugins has been released

The 7.84 Code Library DLLs for use in Lite-C and C-Script for people who don't use Delphi are also now available.

Please read the documentation before using the SDK or DLLs.

Download link: http://3dgs.lazydogsoftware.com/

the biggest new edition is support in the Scheduler for using procedures without an entity attached to them.

hello friend the help they gave me the last you see me was very helpful thank you very much, and I wondered if I could help with this.

It is to create a button in delphi linked with this is the code a7

Panel12:=pan_create('bmap = FondoBtn.pcx;pos_x = 0;pos_y = 0 ;flags=visible;button =655, 13, Salirsobre.png, Salirnormal.png, Salirpresionado.png, NULL,NULL,NULL;',_VAR(2));
Panel12.flags := _VISIBLE or OVERLAY OR TRANSLUCENT;
panel12.event:=@Salir;


and when I call the procedure only meets the condition to leave when I click on the panel, A click on the button does nothing


This is the code of procedure

procedure Salir(aPanel:PPanel); cdecl ;
begin
if aPanel = Panel12 Then
sys_exit('');
end;
if you can help me again, again be grateful

sorry to say your english grammar makes it very hard to understand what you need.

but I believe that you need to look at sample6.dpr in the delphi sdk for an example.

I assume you are using A7 latest version.

sorry for my grammar.I'm using the version 7.05.4, and thanks for answering.
I'm trying to create a button to respond when I click it.
in the code, I'm trying to call the procedure Salir.

happens that when I do click on the button, this does not call the procedure
But when I click on the panel, calls the procedure.

I have also read the example6, I write the code as it appears and the same thing happens.

the only thing that i need is to know how to create a button to call a procedure

I hope you can help me, and this time you understand what I try to do
Thank you very much

code to create the button

Panel12:=pan_create('bmap = FondoBtn.pcx;pos_x = 0;pos_y = 0 ;flags=visible;button =655, 13, Salirsobre.png, Salirnormal.png, Salirpresionado.png, NULL,NULL,NULL;',_VAR(2));
Panel12.flags := _VISIBLE or OVERLAY OR TRANSLUCENT;
panel12.event:=@Salir;

procedure code

procedure Salir(aPanel:PPanel); cdecl ;
begin
if aPanel = Panel12 Then
sys_exit('');
end;

O...M...G. Warez Storm these days.

Agree, buy a legal version of 3dgs or download the free version. This Warez users waste our time !

these damn WAREZ users driving me Crazy .
they are like a F* plague