mirror of
https://github.com/dashr9230/SA-MP.git
synced 2025-07-18 17:38:12 +08:00
[exgui] Add forms
This commit is contained in:
RD42
24
exgui/About.dfm
Normal file
24
exgui/About.dfm
Normal file
@ -0,0 +1,24 @@
|
||||
object fmAbout: TfmAbout
|
||||
Left = 604
|
||||
Top = 109
|
||||
BorderStyle = bsNone
|
||||
Caption = 'About SA-MP'
|
||||
ClientHeight = 246
|
||||
ClientWidth = 350
|
||||
Color = clGray
|
||||
TransparentColorValue = clMaroon
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -12
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = [fsBold]
|
||||
OldCreateOrder = False
|
||||
Position = poMainFormCenter
|
||||
OnClick = FormClick
|
||||
OnClose = FormClose
|
||||
OnCreate = FormCreate
|
||||
OnDestroy = FormDestroy
|
||||
OnShow = FormShow
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 15
|
||||
end
|
||||
24
exgui/About.pas
Normal file
24
exgui/About.pas
Normal file
@ -0,0 +1,24 @@
|
||||
unit About;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs;
|
||||
|
||||
type
|
||||
TForm2 = class(TForm)
|
||||
private
|
||||
{ Private declarations }
|
||||
public
|
||||
{ Public declarations }
|
||||
end;
|
||||
|
||||
var
|
||||
Form2: TForm2;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
end.
|
||||
47
exgui/ExportFavorites.dfm
Normal file
47
exgui/ExportFavorites.dfm
Normal file
@ -0,0 +1,47 @@
|
||||
object fmExportFavorites: TfmExportFavorites
|
||||
Left = 410
|
||||
Top = 136
|
||||
BorderStyle = bsDialog
|
||||
Caption = 'Export Favorites'
|
||||
ClientHeight = 83
|
||||
ClientWidth = 204
|
||||
Color = clBtnFace
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Verdana'
|
||||
Font.Style = []
|
||||
OldCreateOrder = False
|
||||
Position = poScreenCenter
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object cbIncludeSavedPasswords: TCheckBox
|
||||
Left = 16
|
||||
Top = 16
|
||||
Width = 169
|
||||
Height = 17
|
||||
Caption = 'Include Saved Passwords'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
end
|
||||
object bnOk: TButton
|
||||
Left = 64
|
||||
Top = 48
|
||||
Width = 75
|
||||
Height = 25
|
||||
Caption = 'OK'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ModalResult = 1
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
end
|
||||
end
|
||||
24
exgui/ExportFavorites.pas
Normal file
24
exgui/ExportFavorites.pas
Normal file
@ -0,0 +1,24 @@
|
||||
unit ExportFavorites;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs;
|
||||
|
||||
type
|
||||
TForm3 = class(TForm)
|
||||
private
|
||||
{ Private declarations }
|
||||
public
|
||||
{ Public declarations }
|
||||
end;
|
||||
|
||||
var
|
||||
Form3: TForm3;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
end.
|
||||
63
exgui/ImportFavorites.dfm
Normal file
63
exgui/ImportFavorites.dfm
Normal file
@ -0,0 +1,63 @@
|
||||
object fmImportFavorites: TfmImportFavorites
|
||||
Left = 194
|
||||
Top = 108
|
||||
BorderStyle = bsDialog
|
||||
Caption = 'Import Favorites'
|
||||
ClientHeight = 108
|
||||
ClientWidth = 204
|
||||
Color = clBtnFace
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Verdana'
|
||||
Font.Style = []
|
||||
OldCreateOrder = False
|
||||
Position = poScreenCenter
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object rbAddToCurrent: TRadioButton
|
||||
Left = 16
|
||||
Top = 16
|
||||
Width = 169
|
||||
Height = 17
|
||||
Caption = 'Add to current favorites'
|
||||
Checked = True
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
TabStop = True
|
||||
end
|
||||
object rbReplaceCurrent: TRadioButton
|
||||
Left = 16
|
||||
Top = 40
|
||||
Width = 169
|
||||
Height = 17
|
||||
Caption = 'Replace current favorites'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
end
|
||||
object bnOk: TButton
|
||||
Left = 64
|
||||
Top = 72
|
||||
Width = 75
|
||||
Height = 25
|
||||
Caption = 'OK'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ModalResult = 1
|
||||
ParentFont = False
|
||||
TabOrder = 2
|
||||
end
|
||||
end
|
||||
24
exgui/ImportFavorites.pas
Normal file
24
exgui/ImportFavorites.pas
Normal file
@ -0,0 +1,24 @@
|
||||
unit ImportFavorites;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs;
|
||||
|
||||
type
|
||||
TForm4 = class(TForm)
|
||||
private
|
||||
{ Private declarations }
|
||||
public
|
||||
{ Public declarations }
|
||||
end;
|
||||
|
||||
var
|
||||
Form4: TForm4;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
end.
|
||||
BIN
exgui/Main.ddp
Normal file
BIN
exgui/Main.ddp
Normal file
Binary file not shown.
2016
exgui/Main.dfm
2016
exgui/Main.dfm
File diff suppressed because it is too large
Load Diff
48
exgui/MasterUpdate.dfm
Normal file
48
exgui/MasterUpdate.dfm
Normal file
@ -0,0 +1,48 @@
|
||||
object fmMasterUpdate: TfmMasterUpdate
|
||||
Left = 489
|
||||
Top = 332
|
||||
BorderStyle = bsNone
|
||||
Caption = 'Master Server Update'
|
||||
ClientHeight = 103
|
||||
ClientWidth = 300
|
||||
Color = clBtnFace
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Verdana'
|
||||
Font.Style = []
|
||||
OldCreateOrder = False
|
||||
Position = poMainFormCenter
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object lblPleaseWait: TLabel
|
||||
Left = 0
|
||||
Top = 24
|
||||
Width = 300
|
||||
Height = 13
|
||||
Alignment = taCenter
|
||||
AutoSize = False
|
||||
Caption = 'Please Wait'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clBtnText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
end
|
||||
object lblUpdating: TLabel
|
||||
Left = 0
|
||||
Top = 56
|
||||
Width = 300
|
||||
Height = 13
|
||||
Alignment = taCenter
|
||||
AutoSize = False
|
||||
Caption = 'Retrieving list from master server...'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clBtnText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
end
|
||||
end
|
||||
24
exgui/MasterUpdate.pas
Normal file
24
exgui/MasterUpdate.pas
Normal file
@ -0,0 +1,24 @@
|
||||
unit MasterUpdate;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs;
|
||||
|
||||
type
|
||||
TForm5 = class(TForm)
|
||||
private
|
||||
{ Private declarations }
|
||||
public
|
||||
{ Public declarations }
|
||||
end;
|
||||
|
||||
var
|
||||
Form5: TForm5;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
end.
|
||||
69
exgui/RconConfig.dfm
Normal file
69
exgui/RconConfig.dfm
Normal file
@ -0,0 +1,69 @@
|
||||
object fmRconConfig: TfmRconConfig
|
||||
Left = 303
|
||||
Top = 533
|
||||
BorderStyle = bsDialog
|
||||
Caption = 'Remote Console Config'
|
||||
ClientHeight = 107
|
||||
ClientWidth = 242
|
||||
Color = clBtnFace
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Verdana'
|
||||
Font.Style = []
|
||||
OldCreateOrder = False
|
||||
Position = poScreenCenter
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object lbHost: TLabel
|
||||
Left = 8
|
||||
Top = 16
|
||||
Width = 62
|
||||
Height = 13
|
||||
Caption = 'Host:Port -'
|
||||
end
|
||||
object lbPassword: TLabel
|
||||
Left = 8
|
||||
Top = 48
|
||||
Width = 63
|
||||
Height = 13
|
||||
Caption = 'Password -'
|
||||
end
|
||||
object edHost: TEdit
|
||||
Left = 80
|
||||
Top = 11
|
||||
Width = 153
|
||||
Height = 21
|
||||
TabOrder = 0
|
||||
OnChange = edPasswordChange
|
||||
OnKeyPress = edHostKeyPress
|
||||
end
|
||||
object edPassword: TEdit
|
||||
Left = 80
|
||||
Top = 43
|
||||
Width = 153
|
||||
Height = 21
|
||||
PasswordChar = '*'
|
||||
TabOrder = 1
|
||||
OnChange = edPasswordChange
|
||||
end
|
||||
object bnConnect: TButton
|
||||
Left = 80
|
||||
Top = 72
|
||||
Width = 75
|
||||
Height = 25
|
||||
Caption = 'Connect'
|
||||
Enabled = False
|
||||
TabOrder = 2
|
||||
OnClick = bnConnectClick
|
||||
end
|
||||
object bnCancel: TButton
|
||||
Left = 160
|
||||
Top = 72
|
||||
Width = 75
|
||||
Height = 25
|
||||
Caption = 'Cancel'
|
||||
TabOrder = 3
|
||||
OnClick = bnCancelClick
|
||||
end
|
||||
end
|
||||
24
exgui/RconConfig.pas
Normal file
24
exgui/RconConfig.pas
Normal file
@ -0,0 +1,24 @@
|
||||
unit RconConfig;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs;
|
||||
|
||||
type
|
||||
TForm6 = class(TForm)
|
||||
private
|
||||
{ Private declarations }
|
||||
public
|
||||
{ Public declarations }
|
||||
end;
|
||||
|
||||
var
|
||||
Form6: TForm6;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
end.
|
||||
294
exgui/ServerProperties.dfm
Normal file
294
exgui/ServerProperties.dfm
Normal file
@ -0,0 +1,294 @@
|
||||
object fmServerProperties: TfmServerProperties
|
||||
Left = 638
|
||||
Top = 304
|
||||
BorderStyle = bsDialog
|
||||
Caption = 'Server Properties - ( Just click "Connect"! )'
|
||||
ClientHeight = 227
|
||||
ClientWidth = 278
|
||||
Color = clBtnFace
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Verdana'
|
||||
Font.Style = []
|
||||
OldCreateOrder = False
|
||||
Position = poScreenCenter
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object lbAddressLab: TLabel
|
||||
Left = 16
|
||||
Top = 40
|
||||
Width = 45
|
||||
Height = 14
|
||||
Caption = 'Address:'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
end
|
||||
object lbPlayersLab: TLabel
|
||||
Left = 16
|
||||
Top = 56
|
||||
Width = 39
|
||||
Height = 14
|
||||
Caption = 'Players:'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
end
|
||||
object lbPingLab: TLabel
|
||||
Left = 16
|
||||
Top = 72
|
||||
Width = 23
|
||||
Height = 14
|
||||
Caption = 'Ping:'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
end
|
||||
object lbModeLab: TLabel
|
||||
Left = 16
|
||||
Top = 88
|
||||
Width = 29
|
||||
Height = 14
|
||||
Caption = 'Mode:'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
end
|
||||
object lbMapLab: TLabel
|
||||
Left = 16
|
||||
Top = 104
|
||||
Width = 51
|
||||
Height = 14
|
||||
Caption = 'Language:'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
end
|
||||
object lbMap: TLabel
|
||||
Left = 80
|
||||
Top = 104
|
||||
Width = 185
|
||||
Height = 13
|
||||
AutoSize = False
|
||||
Caption = '- - -'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
end
|
||||
object lbMode: TLabel
|
||||
Left = 80
|
||||
Top = 88
|
||||
Width = 185
|
||||
Height = 13
|
||||
AutoSize = False
|
||||
Caption = '- - -'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
end
|
||||
object lbPing: TLabel
|
||||
Left = 80
|
||||
Top = 71
|
||||
Width = 185
|
||||
Height = 13
|
||||
AutoSize = False
|
||||
Caption = '- - -'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
end
|
||||
object lbPlayers: TLabel
|
||||
Left = 80
|
||||
Top = 56
|
||||
Width = 185
|
||||
Height = 13
|
||||
AutoSize = False
|
||||
Caption = '- - -'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
end
|
||||
object lbHostName: TLabel
|
||||
Left = 16
|
||||
Top = 8
|
||||
Width = 251
|
||||
Height = 16
|
||||
Alignment = taCenter
|
||||
AutoSize = False
|
||||
Caption = '- - -'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -13
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
end
|
||||
object lbServerPassword: TLabel
|
||||
Left = 16
|
||||
Top = 136
|
||||
Width = 89
|
||||
Height = 14
|
||||
Caption = 'Server Password:'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
end
|
||||
object lbRconPassword: TLabel
|
||||
Left = 16
|
||||
Top = 160
|
||||
Width = 85
|
||||
Height = 14
|
||||
Caption = 'RCON Password:'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
end
|
||||
object edAddress: TEdit
|
||||
Left = 80
|
||||
Top = 40
|
||||
Width = 185
|
||||
Height = 13
|
||||
TabStop = False
|
||||
BorderStyle = bsNone
|
||||
Color = clBtnFace
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
ParentShowHint = False
|
||||
PopupMenu = pmCopy
|
||||
ReadOnly = True
|
||||
ShowHint = False
|
||||
TabOrder = 5
|
||||
Text = '- - -'
|
||||
end
|
||||
object edServerPassword: TEdit
|
||||
Left = 128
|
||||
Top = 135
|
||||
Width = 139
|
||||
Height = 16
|
||||
BevelInner = bvNone
|
||||
BevelKind = bkFlat
|
||||
BorderStyle = bsNone
|
||||
Ctl3D = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -13
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentCtl3D = False
|
||||
ParentFont = False
|
||||
PasswordChar = '*'
|
||||
TabOrder = 3
|
||||
end
|
||||
object edRconPassword: TEdit
|
||||
Left = 128
|
||||
Top = 159
|
||||
Width = 139
|
||||
Height = 16
|
||||
BevelInner = bvNone
|
||||
BevelKind = bkFlat
|
||||
BorderStyle = bsNone
|
||||
Ctl3D = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -13
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentCtl3D = False
|
||||
ParentFont = False
|
||||
PasswordChar = '*'
|
||||
TabOrder = 4
|
||||
end
|
||||
object bnSave: TButton
|
||||
Left = 112
|
||||
Top = 192
|
||||
Width = 75
|
||||
Height = 25
|
||||
Caption = 'Save'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
OnClick = bnSaveClick
|
||||
end
|
||||
object bnCancel: TButton
|
||||
Left = 192
|
||||
Top = 192
|
||||
Width = 75
|
||||
Height = 25
|
||||
Caption = 'Cancel'
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 2
|
||||
OnClick = bnCancelClick
|
||||
end
|
||||
object bnConnect: TButton
|
||||
Left = 16
|
||||
Top = 192
|
||||
Width = 75
|
||||
Height = 25
|
||||
Caption = 'Connect'
|
||||
Default = True
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
OnClick = bnConnectClick
|
||||
end
|
||||
object pmCopy: TPopupMenu
|
||||
OnPopup = pmCopyPopup
|
||||
Left = 8
|
||||
Top = 8
|
||||
object piCopy: TMenuItem
|
||||
Caption = 'Copy'
|
||||
OnClick = piCopyClick
|
||||
end
|
||||
end
|
||||
end
|
||||
24
exgui/ServerProperties.pas
Normal file
24
exgui/ServerProperties.pas
Normal file
@ -0,0 +1,24 @@
|
||||
unit ServerProperties;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs;
|
||||
|
||||
type
|
||||
TForm7 = class(TForm)
|
||||
private
|
||||
{ Private declarations }
|
||||
public
|
||||
{ Public declarations }
|
||||
end;
|
||||
|
||||
var
|
||||
Form7: TForm7;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
end.
|
||||
113
exgui/Settings.dfm
Normal file
113
exgui/Settings.dfm
Normal file
@ -0,0 +1,113 @@
|
||||
object fmSettings: TfmSettings
|
||||
Left = 473
|
||||
Top = 185
|
||||
BorderStyle = bsDialog
|
||||
Caption = 'Settings'
|
||||
ClientHeight = 178
|
||||
ClientWidth = 250
|
||||
Color = clBtnFace
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Verdana'
|
||||
Font.Style = []
|
||||
OldCreateOrder = False
|
||||
Position = poScreenCenter
|
||||
OnCreate = FormCreate
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object bnSave: TButton
|
||||
Left = 8
|
||||
Top = 144
|
||||
Width = 75
|
||||
Height = 25
|
||||
Caption = 'Save'
|
||||
Default = True
|
||||
TabOrder = 0
|
||||
OnClick = bnSaveClick
|
||||
end
|
||||
object bnCancel: TButton
|
||||
Left = 88
|
||||
Top = 144
|
||||
Width = 75
|
||||
Height = 25
|
||||
Caption = 'Cancel'
|
||||
TabOrder = 1
|
||||
OnClick = bnCancelClick
|
||||
end
|
||||
object gbPasswords: TGroupBox
|
||||
Left = 8
|
||||
Top = 8
|
||||
Width = 233
|
||||
Height = 129
|
||||
Caption = ' Passwords '
|
||||
TabOrder = 2
|
||||
object Label1: TLabel
|
||||
Left = 16
|
||||
Top = 80
|
||||
Width = 196
|
||||
Height = 13
|
||||
Caption = 'San Andreas Installation Location:'
|
||||
end
|
||||
object sbBrowse: TSpeedButton
|
||||
Left = 192
|
||||
Top = 96
|
||||
Width = 23
|
||||
Height = 21
|
||||
Flat = True
|
||||
Glyph.Data = {
|
||||
36030000424D3603000000000000360000002800000010000000100000000100
|
||||
18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
|
||||
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
|
||||
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
|
||||
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF18A5D6
|
||||
18A5D618A5D6FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
|
||||
FFFF00FFFF00FFFF00FFFF00FF18A5D69CDEFF84EFFF52C6F718A5D6299CC618
|
||||
8CBD299CC6FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF18A5D6
|
||||
4AB5F79CFFFF94F7FF7BE7FF73E7F77BE7FF73E7F752C6F718A5D6299CC6FF00
|
||||
FFFF00FFFF00FFFF00FFFF00FF18A5D64AB5F7ADF7FF8CF7F78CEFFF8CEFFF8C
|
||||
EFFF7BE7FF73E7F77BD6F752C6F718A5D6FF00FFFF00FFFF00FFFF00FF18A5D6
|
||||
18A5D6A5DEF794F7FF8CEFFF8CEFFF8CEFFF8CEFFF8CEFFF7BE7FF73E7F752C6
|
||||
F7FF00FFFF00FFFF00FFFF00FF18A5D67BE7FF18A5D69CFFFF94F7FF8CF7F794
|
||||
F7FF8CEFFF8CEFFF8CEFFF7BE7FF73E7F7188CBDFF00FFFF00FFFF00FF18A5D6
|
||||
94F7FF18A5D6A5DEF7A5EFF7A5EFF79CFFFF8CEFFF8CEFFF8CEFFF73E7F77BE7
|
||||
FF4AB5F7FF00FFFF00FFFF00FF18A5D69CFFFF73E7F718A5D6299CC6188CBD29
|
||||
9CC6A5DEF78CF7F784EFFF84EFFF7BE7FF73E7F7299CC6FF00FFFF00FF18A5D6
|
||||
9CFFFF94F7FF73E7F77BE7FF73E7F76BDEEF18A5D6A5DEF784EFFF84EFFF84EF
|
||||
FF94EFFF18A5D6FF00FFFF00FF18A5D69CFFFF94F7FF94F7FF8CEFFF94F7FF73
|
||||
E7F77BE7FF18A5D6188CBD18A5D618A5D618A5D6299CC6FF00FFFF00FF18A5D6
|
||||
C6FFFF94F7FF9CFFFFCEFFFFD6F7FF8CEFFF8CF7F77BE7FF73EFF718A5D6FF00
|
||||
FFFF00FFFF00FFFF00FFFF00FF18A5D69CDEFFC6FFFFC6FFFF9CDEFF18A5D618
|
||||
8CBD299CC6188CBD299CC618A5D6FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
|
||||
18A5D618A5D6299CC6188CBDFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
|
||||
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
|
||||
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
|
||||
OnClick = sbBrowseClick
|
||||
end
|
||||
object cbSaveServerPasswords: TCheckBox
|
||||
Left = 16
|
||||
Top = 24
|
||||
Width = 201
|
||||
Height = 17
|
||||
Caption = 'Auto-Save Server Passwords'
|
||||
TabOrder = 0
|
||||
end
|
||||
object cbSaveRconPasswords: TCheckBox
|
||||
Left = 16
|
||||
Top = 48
|
||||
Width = 201
|
||||
Height = 17
|
||||
Caption = 'Auto-Save Rcon Passwords'
|
||||
TabOrder = 1
|
||||
end
|
||||
object edInstallLoc: TEdit
|
||||
Left = 16
|
||||
Top = 96
|
||||
Width = 177
|
||||
Height = 21
|
||||
Color = clBtnFace
|
||||
ReadOnly = True
|
||||
TabOrder = 2
|
||||
end
|
||||
end
|
||||
end
|
||||
24
exgui/Settings.pas
Normal file
24
exgui/Settings.pas
Normal file
@ -0,0 +1,24 @@
|
||||
unit Settings;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs;
|
||||
|
||||
type
|
||||
TForm8 = class(TForm)
|
||||
private
|
||||
{ Private declarations }
|
||||
public
|
||||
{ Public declarations }
|
||||
end;
|
||||
|
||||
var
|
||||
Form8: TForm8;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
end.
|
||||
@ -2,12 +2,28 @@ program samp;
|
||||
|
||||
uses
|
||||
Forms,
|
||||
Main in 'Main.pas' {Form1};
|
||||
Main in 'Main.pas' {Form1},
|
||||
About in 'About.pas' {Form2},
|
||||
ExportFavorites in 'ExportFavorites.pas' {Form3},
|
||||
ImportFavorites in 'ImportFavorites.pas' {Form4},
|
||||
MasterUpdate in 'MasterUpdate.pas' {Form5},
|
||||
RconConfig in 'RconConfig.pas' {Form6},
|
||||
ServerProperties in 'ServerProperties.pas' {Form7},
|
||||
Settings in 'Settings.pas' {Form8},
|
||||
wnd_webrunform in 'wnd_webrunform.pas' {Form9};
|
||||
|
||||
{$R *.res}
|
||||
|
||||
begin
|
||||
Application.Initialize;
|
||||
Application.CreateForm(TForm1, Form1);
|
||||
Application.CreateForm(TForm2, Form2);
|
||||
Application.CreateForm(TForm3, Form3);
|
||||
Application.CreateForm(TForm4, Form4);
|
||||
Application.CreateForm(TForm5, Form5);
|
||||
Application.CreateForm(TForm6, Form6);
|
||||
Application.CreateForm(TForm7, Form7);
|
||||
Application.CreateForm(TForm8, Form8);
|
||||
Application.CreateForm(TForm9, Form9);
|
||||
Application.Run;
|
||||
end.
|
||||
|
||||
78
exgui/wnd_webrunform.dfm
Normal file
78
exgui/wnd_webrunform.dfm
Normal file
@ -0,0 +1,78 @@
|
||||
object wnd_webrunform: Twnd_webrunform
|
||||
Left = 638
|
||||
Top = 256
|
||||
BorderIcons = [biSystemMenu, biMinimize]
|
||||
BorderStyle = bsDialog
|
||||
Caption = 'SA-MP URL'
|
||||
ClientHeight = 91
|
||||
ClientWidth = 382
|
||||
Color = clBtnFace
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'MS Sans Serif'
|
||||
Font.Style = []
|
||||
OldCreateOrder = False
|
||||
Position = poScreenCenter
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object Label1: TLabel
|
||||
Left = 11
|
||||
Top = 11
|
||||
Width = 358
|
||||
Height = 30
|
||||
Caption = 'Play on this server now or add to favorites?'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
end
|
||||
object BitBtn1: TBitBtn
|
||||
Left = 142
|
||||
Top = 55
|
||||
Width = 100
|
||||
Height = 25
|
||||
Caption = 'Add to Favorites.'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
OnClick = BitBtn1Click
|
||||
end
|
||||
object BitBtn2: TBitBtn
|
||||
Left = 249
|
||||
Top = 55
|
||||
Width = 75
|
||||
Height = 25
|
||||
Caption = 'Cancel'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
OnClick = BitBtn2Click
|
||||
end
|
||||
object BitBtn3: TBitBtn
|
||||
Left = 61
|
||||
Top = 55
|
||||
Width = 75
|
||||
Height = 25
|
||||
Caption = 'Play'
|
||||
Default = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 2
|
||||
OnClick = BitBtn3Click
|
||||
end
|
||||
end
|
||||
24
exgui/wnd_webrunform.pas
Normal file
24
exgui/wnd_webrunform.pas
Normal file
@ -0,0 +1,24 @@
|
||||
unit wnd_webrunform;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs;
|
||||
|
||||
type
|
||||
TForm9 = class(TForm)
|
||||
private
|
||||
{ Private declarations }
|
||||
public
|
||||
{ Public declarations }
|
||||
end;
|
||||
|
||||
var
|
||||
Form9: TForm9;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
end.
|
||||
Reference in New Issue
Block a user