SA-MP/exgui/ServerProperties.pas

75 lines
1.6 KiB
ObjectPascal
Raw Normal View History

2023-11-07 17:10:47 +08:00
unit ServerProperties;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
2023-11-07 23:44:02 +08:00
Dialogs, Menus, StdCtrls;
2023-11-07 17:10:47 +08:00
type
2023-11-07 23:44:02 +08:00
TfmServerProperties = class(TForm)
2023-12-02 20:35:55 +08:00
lbAddressLab: TLabel;
lbPlayersLab: TLabel;
lbPingLab: TLabel;
lbModeLab: TLabel;
lbMapLab: TLabel;
lbMap: TLabel;
lbMode: TLabel;
lbPing: TLabel;
lbPlayers: TLabel;
edAddress: TEdit;
lbHostName: TLabel;
lbServerPassword: TLabel;
lbRconPassword: TLabel;
edServerPassword: TEdit;
edRconPassword: TEdit;
bnSave: TButton;
bnCancel: TButton;
bnConnect: TButton;
pmCopy: TPopupMenu;
piCopy: TMenuItem;
2023-12-02 19:57:04 +08:00
procedure bnSaveClick(Sender: TObject);
procedure bnCancelClick(Sender: TObject);
procedure bnConnectClick(Sender: TObject);
procedure pmCopyPopup(Sender: TObject);
procedure piCopyClick(Sender: TObject);
2023-11-07 17:10:47 +08:00
private
{ Private declarations }
public
{ Public declarations }
end;
var
2023-11-07 23:44:02 +08:00
fmServerProperties: TfmServerProperties;
2023-11-07 17:10:47 +08:00
implementation
{$R *.dfm}
2023-12-02 19:57:04 +08:00
procedure TfmServerProperties.bnSaveClick(Sender: TObject);
begin
// TODO: TfmServerProperties.bnSaveClick
end;
procedure TfmServerProperties.bnCancelClick(Sender: TObject);
begin
// TODO: TfmServerProperties.bnCancelClick
end;
procedure TfmServerProperties.bnConnectClick(Sender: TObject);
begin
// TODO: TfmServerProperties.bnConnectClick
end;
procedure TfmServerProperties.pmCopyPopup(Sender: TObject);
begin
// TODO: TfmServerProperties.pmCopyPopup
end;
procedure TfmServerProperties.piCopyClick(Sender: TObject);
begin
// TODO: TfmServerProperties.piCopyClick
end;
2023-11-07 17:10:47 +08:00
end.