home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Secret Service 54a
/
SSERVCD_54A.bin
/
UTILS
/
CHEATS
/
PG2EDIT.ZIP
/
PG2UEdit.exe
/
0
/
RCDATA
/
TFRMPG2SGEDIT
/
TFRMPG2SGEDIT.txt
Wrap
Text File
|
1997-12-03
|
8KB
|
407 lines
object frmPG2SGEdit: TfrmPG2SGEdit
Left = 200
Top = 108
Width = 439
Height = 392
BorderIcons = [biMinimize, biMaximize]
Caption = 'Panzer General 2 Save Game Editor'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = mnuMain
Position = poScreenCenter
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 13
object gbFileOption: TGroupBox
Left = 0
Top = 0
Width = 431
Height = 49
Align = alTop
Caption = 'System Options'
TabOrder = 0
object btnLoad: TBitBtn
Left = 8
Top = 16
Width = 75
Height = 25
Caption = '&Load File'
TabOrder = 0
OnClick = btnLoadClick
end
object btnSave: TBitBtn
Left = 96
Top = 16
Width = 75
Height = 25
Caption = 'Sa&ve File'
TabOrder = 1
OnClick = btnSaveClick
end
object btnExit: TBitBtn
Left = 288
Top = 16
Width = 131
Height = 25
Caption = '&Return to Main Menu'
TabOrder = 2
OnClick = btnExitClick
end
end
object GroupBox1: TGroupBox
Left = 0
Top = 49
Width = 431
Height = 48
Align = alTop
Caption = 'Editor Options'
Enabled = False
TabOrder = 1
object btnPrev: TBitBtn
Left = 8
Top = 16
Width = 75
Height = 25
Caption = '&Previous'
TabOrder = 0
OnClick = btnPrevClick
end
object btnNext: TBitBtn
Left = 96
Top = 16
Width = 75
Height = 25
Caption = '&Next'
TabOrder = 1
OnClick = btnNextClick
end
object btnUpdate: TBitBtn
Left = 184
Top = 16
Width = 75
Height = 25
Caption = '&Update'
TabOrder = 2
OnClick = btnUpdateClick
end
end
object GroupBox2: TGroupBox
Left = 0
Top = 97
Width = 431
Height = 249
Align = alClient
Caption = 'Unit Information'
Enabled = False
TabOrder = 2
object Label15: TLabel
Left = 8
Top = 16
Width = 36
Height = 13
Caption = 'Unit No'
end
object Label18: TLabel
Left = 216
Top = 16
Width = 71
Height = 13
Caption = 'Global Prestige'
end
object Label7: TLabel
Left = 8
Top = 64
Width = 50
Height = 13
Caption = 'Unit Name'
end
object Label16: TLabel
Left = 144
Top = 64
Width = 36
Height = 13
Caption = 'Country'
end
object Label8: TLabel
Left = 280
Top = 64
Width = 47
Height = 13
Caption = 'Hex Code'
end
object Label9: TLabel
Left = 344
Top = 64
Width = 47
Height = 13
Caption = 'Unit Code'
end
object Experience: TLabel
Left = 8
Top = 120
Width = 53
Height = 13
Caption = 'Experience'
end
object Label6: TLabel
Left = 104
Top = 120
Width = 20
Height = 13
Caption = 'Fuel'
end
object Label10: TLabel
Left = 200
Top = 120
Width = 67
Height = 13
Caption = 'Total Strength'
end
object Label11: TLabel
Left = 296
Top = 120
Width = 77
Height = 13
Caption = 'Current Strength'
end
object Label12: TLabel
Left = 8
Top = 176
Width = 76
Height = 13
Caption = 'Transport Name'
end
object Label17: TLabel
Left = 144
Top = 176
Width = 36
Height = 13
Caption = 'Country'
end
object Label13: TLabel
Left = 280
Top = 176
Width = 47
Height = 13
Caption = 'Hex Code'
end
object Label14: TLabel
Left = 344
Top = 176
Width = 73
Height = 13
Caption = 'Transport Code'
end
object Label1: TLabel
Left = 112
Top = 16
Width = 71
Height = 13
Caption = 'Total No. Units'
end
object edtUnitNo: TEdit
Left = 8
Top = 32
Width = 89
Height = 21
ReadOnly = True
TabOrder = 0
end
object sePrestige: TSpinEdit
Left = 216
Top = 32
Width = 89
Height = 22
MaxLength = 5
MaxValue = 55000
MinValue = 0
TabOrder = 1
Value = 0
OnChange = sePrestigeChange
end
object edtUnitName: TEdit
Left = 8
Top = 80
Width = 121
Height = 21
ReadOnly = True
TabOrder = 2
end
object edtUnitCountry: TEdit
Left = 144
Top = 80
Width = 121
Height = 21
ReadOnly = True
TabOrder = 3
end
object edtHexCode: TEdit
Left = 280
Top = 80
Width = 49
Height = 21
ReadOnly = True
TabOrder = 4
end
object seUnitCode: TSpinEdit
Left = 344
Top = 80
Width = 57
Height = 22
MaxLength = 3
MaxValue = 585
MinValue = 1
TabOrder = 5
Value = 1
OnChange = seTransportCodeChange
end
object seExperience: TSpinEdit
Left = 8
Top = 136
Width = 81
Height = 22
MaxLength = 5
MaxValue = 65000
MinValue = 0
TabOrder = 6
Value = 0
OnChange = seExperienceChange
end
object seFuel1: TSpinEdit
Left = 104
Top = 136
Width = 81
Height = 22
MaxLength = 3
MaxValue = 255
MinValue = 0
TabOrder = 7
Value = 0
OnChange = seExperienceChange
end
object seTotalStr: TSpinEdit
Left = 200
Top = 136
Width = 81
Height = 22
MaxLength = 2
MaxValue = 15
MinValue = 0
TabOrder = 8
Value = 0
OnChange = seTotalStrChange
end
object seCurrentStr: TSpinEdit
Left = 296
Top = 136
Width = 81
Height = 22
MaxLength = 2
MaxValue = 15
MinValue = 0
TabOrder = 9
Value = 0
OnChange = seExperienceChange
end
object edtTransportName: TEdit
Left = 8
Top = 195
Width = 121
Height = 21
ReadOnly = True
TabOrder = 10
end
object edtTransportCountry: TEdit
Left = 144
Top = 195
Width = 121
Height = 21
ReadOnly = True
TabOrder = 11
end
object edtTransportHexCode: TEdit
Left = 280
Top = 195
Width = 49
Height = 21
ReadOnly = True
TabOrder = 12
end
object seTransportCode: TSpinEdit
Left = 344
Top = 194
Width = 57
Height = 22
MaxLength = 3
MaxValue = 585
MinValue = 0
TabOrder = 13
Value = 0
OnChange = seTransportCodeChange
end
object edtTotalUnit: TEdit
Left = 112
Top = 32
Width = 89
Height = 21
ReadOnly = True
TabOrder = 14
end
object sbStatus: TStatusBar
Left = 2
Top = 228
Width = 427
Height = 19
Panels = <
item
Width = 50
end>
SimplePanel = False
end
end
object mnuMain: TMainMenu
Left = 336
Top = 120
object mnuFile: TMenuItem
Caption = 'S&ystem Options'
object LoadFile1: TMenuItem
Caption = '&Load File'
OnClick = btnLoadClick
end
object mnuSave: TMenuItem
Caption = 'Sa&ve File'
OnClick = btnSaveClick
end
object N1: TMenuItem
Caption = '-'
end
object MainMenu1: TMenuItem
Caption = 'Return to &Main Menu'
OnClick = btnExitClick
end
end
object mnuEditor: TMenuItem
Caption = 'Editor Options'
object Previous1: TMenuItem
Caption = '&Previous'
OnClick = btnPrevClick
end
object mnuNext: TMenuItem
Caption = '&Next'
OnClick = btnNextClick
end
object Update1: TMenuItem
Caption = '&Update'
OnClick = btnUpdateClick
end
end
end
object dlgLoad: TOpenDialog
Left = 376
Top = 121
end
end