Backups/SA-MP
1
0
Fork 0
mirror of https://github.com/dashr9230/SA-MP.git synced 2024-12-22 22:47:29 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

[exgui] Update unit_webrunform

Browse Source 
* Add Twnd_webrunform member variables
* Implement Twnd_webrunform functions
This commit is contained in:
RD42 2023-12-06 23:01:25 +08:00
parent d56465f7ff
commit 52ae0859d6
3 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
exgui/unit_webrunform.dcu Normal file
View File

Binary file not shown.

BIN
exgui/unit_webrunform.ddp Normal file
View File

Binary file not shown.

12
exgui/unit_webrunform.pas
View File

@ -8,6 +8,11 @@ uses
type type
Twnd_webrunform = class(TForm) Twnd_webrunform = class(TForm)
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
BitBtn3: TBitBtn;
Label1: TLabel;
procedure BitBtn2Click(Sender: TObject); procedure BitBtn2Click(Sender: TObject);
procedure BitBtn3Click(Sender: TObject); procedure BitBtn3Click(Sender: TObject);
procedure BitBtn1Click(Sender: TObject); procedure BitBtn1Click(Sender: TObject);
@ -26,17 +31,18 @@ implementation
procedure Twnd_webrunform.BitBtn2Click(Sender: TObject); procedure Twnd_webrunform.BitBtn2Click(Sender: TObject);
begin begin
// TODO: Twnd_webrunform.BitBtn2Click ModalResult:= mrCancel;
end; end;
procedure Twnd_webrunform.BitBtn3Click(Sender: TObject); procedure Twnd_webrunform.BitBtn3Click(Sender: TObject);
begin begin
// TODO: Twnd_webrunform.BitBtn3Click ModalResult:= mrOk;
end; end;
procedure Twnd_webrunform.BitBtn1Click(Sender: TObject); procedure Twnd_webrunform.BitBtn1Click(Sender: TObject);
begin begin
// TODO: Twnd_webrunform.BitBtn1Click ModalResult:= mrYes;
end; end;
end. end.