mirror of
https://github.com/dashr9230/SA-MP.git
synced 2025-09-19 20:26:14 +08:00
[exgui] Add Rcon form
This commit is contained in:
60
exgui/Rcon.dfm
Normal file
60
exgui/Rcon.dfm
Normal file
@ -0,0 +1,60 @@
|
|||||||
|
object fmRcon: TfmRcon
|
||||||
|
Left = 279
|
||||||
|
Top = 107
|
||||||
|
BorderStyle = bsDialog
|
||||||
|
Caption = 'Remote Console'
|
||||||
|
ClientHeight = 387
|
||||||
|
ClientWidth = 844
|
||||||
|
Color = clBtnFace
|
||||||
|
Font.Charset = DEFAULT_CHARSET
|
||||||
|
Font.Color = clWindowText
|
||||||
|
Font.Height = -11
|
||||||
|
Font.Name = 'MS Sans Serif'
|
||||||
|
Font.Style = []
|
||||||
|
OldCreateOrder = False
|
||||||
|
Position = poScreenCenter
|
||||||
|
OnClose = FormClose
|
||||||
|
OnShow = FormShow
|
||||||
|
PixelsPerInch = 96
|
||||||
|
TextHeight = 13
|
||||||
|
object edInput: TEdit
|
||||||
|
Left = 0
|
||||||
|
Top = 280
|
||||||
|
Width = 649
|
||||||
|
Height = 18
|
||||||
|
BevelInner = bvNone
|
||||||
|
BevelKind = bkFlat
|
||||||
|
BorderStyle = bsNone
|
||||||
|
Font.Charset = ANSI_CHARSET
|
||||||
|
Font.Color = clWhite
|
||||||
|
Font.Height = -13
|
||||||
|
Font.Name = 'Courier New'
|
||||||
|
Font.Style = []
|
||||||
|
ParentFont = False
|
||||||
|
TabOrder = 0
|
||||||
|
Text = 'edInput'
|
||||||
|
OnKeyPress = edInputKeyPress
|
||||||
|
end
|
||||||
|
object moOutput: TMemo
|
||||||
|
Left = 0
|
||||||
|
Top = 0
|
||||||
|
Width = 649
|
||||||
|
Height = 281
|
||||||
|
TabStop = False
|
||||||
|
BevelInner = bvNone
|
||||||
|
BevelKind = bkFlat
|
||||||
|
BorderStyle = bsNone
|
||||||
|
Color = clBlack
|
||||||
|
Font.Charset = ANSI_CHARSET
|
||||||
|
Font.Color = clWhite
|
||||||
|
Font.Height = -13
|
||||||
|
Font.Name = 'Courier New'
|
||||||
|
Font.Style = []
|
||||||
|
Lines.Strings = (
|
||||||
|
'SA:MP Remote Console Utility.'
|
||||||
|
'(C) Copyright 2006 SA:MP Team.')
|
||||||
|
ParentFont = False
|
||||||
|
ReadOnly = True
|
||||||
|
TabOrder = 1
|
||||||
|
end
|
||||||
|
end
|
24
exgui/Rcon.pas
Normal file
24
exgui/Rcon.pas
Normal file
@ -0,0 +1,24 @@
|
|||||||
|
unit Rcon;
|
||||||
|
|
||||||
|
interface
|
||||||
|
|
||||||
|
uses
|
||||||
|
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||||
|
Dialogs, StdCtrls;
|
||||||
|
|
||||||
|
type
|
||||||
|
TfmRcon = class(TForm)
|
||||||
|
private
|
||||||
|
{ Private declarations }
|
||||||
|
public
|
||||||
|
{ Public declarations }
|
||||||
|
end;
|
||||||
|
|
||||||
|
var
|
||||||
|
fmRcon: TfmRcon;
|
||||||
|
|
||||||
|
implementation
|
||||||
|
|
||||||
|
{$R *.dfm}
|
||||||
|
|
||||||
|
end.
|
@ -10,7 +10,8 @@ uses
|
|||||||
RconConfig in 'RconConfig.pas' {Form6},
|
RconConfig in 'RconConfig.pas' {Form6},
|
||||||
ServerProperties in 'ServerProperties.pas' {Form7},
|
ServerProperties in 'ServerProperties.pas' {Form7},
|
||||||
Settings in 'Settings.pas' {Form8},
|
Settings in 'Settings.pas' {Form8},
|
||||||
wnd_webrunform in 'wnd_webrunform.pas' {Form9};
|
wnd_webrunform in 'wnd_webrunform.pas' {Form9},
|
||||||
|
Rcon in 'Rcon.pas' {Form10};
|
||||||
|
|
||||||
{$R *.res}
|
{$R *.res}
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user