home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 July
/
Chip_1999-07_cd.bin
/
oddech
/
hry
/
rampart
/
MakeField.exe
/
0
/
RCDATA
/
TFORM1
/
TFORM1.txt
< prev
Wrap
Text File
|
1999-03-19
|
12KB
|
304 lines
object Form1: TForm1
Left = 189
Top = 113
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Rampart Field Builder'
ClientHeight = 292
ClientWidth = 398
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {<image000.ico>}
Menu = MainMenu1
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 0
Top = 0
Width = 398
Height = 2
Align = alTop
end
object Panel2: TPanel
Left = 0
Top = 2
Width = 105
Height = 290
Align = alLeft
BevelOuter = bvNone
BorderWidth = 1
BorderStyle = bsSingle
Color = clGreen
TabOrder = 0
object VerState: TImage
Left = 5
Top = 88
Width = 16
Height = 16
Transparent = True
end
object Label1: TLabel
Left = 25
Top = 88
Width = 32
Height = 13
Caption = 'Label1'
Color = clGreen
ParentColor = False
end
object BitBtn1: TBitBtn
Left = 1
Top = 5
Width = 100
Height = 25
Caption = 'Verify'
TabOrder = 0
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
555555555555555555555555555555555555555555FF55555555555559055555
55555555577FF5555555555599905555555555557777F5555555555599905555
555555557777FF5555555559999905555555555777777F555555559999990555
5555557777777FF5555557990599905555555777757777F55555790555599055
55557775555777FF5555555555599905555555555557777F5555555555559905
555555555555777FF5555555555559905555555555555777FF55555555555579
05555555555555777FF5555555555557905555555555555777FF555555555555
5990555555555555577755555555555555555555555555555555}
Margin = 5
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 1
Top = 32
Width = 100
Height = 25
Caption = 'Save'
TabOrder = 1
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
0003737FFFFFFFFF7F7330099999999900333777777777777733}
Margin = 5
NumGlyphs = 2
end
object BitBtn3: TBitBtn
Left = 1
Top = 59
Width = 100
Height = 25
Caption = 'Clear'
TabOrder = 2
OnClick = RestartBClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
3333333337FFF7F3333333333000003333333333377777333333}
Margin = 5
NumGlyphs = 2
end
object BitBtn4: TBitBtn
Left = 1
Top = 260
Width = 100
Height = 25
Caption = 'Help'
TabOrder = 3
OnClick = Help2Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333336633
3333333333333FF3333333330000333333364463333333333333388F33333333
00003333333E66433333333333338F38F3333333000033333333E66333333333
33338FF8F3333333000033333333333333333333333338833333333300003333
3333446333333333333333FF3333333300003333333666433333333333333888
F333333300003333333E66433333333333338F38F333333300003333333E6664
3333333333338F38F3333333000033333333E6664333333333338F338F333333
0000333333333E6664333333333338F338F3333300003333344333E666433333
333F338F338F3333000033336664333E664333333388F338F338F33300003333
E66644466643333338F38FFF8338F333000033333E6666666663333338F33888
3338F3330000333333EE666666333333338FF33333383333000033333333EEEE
E333333333388FFFFF8333330000333333333333333333333333388888333333
0000}
Margin = 5
NumGlyphs = 2
end
end
object FieldB: TPanel
Left = 105
Top = 2
Width = 293
Height = 290
Align = alClient
BevelInner = bvLowered
Caption = 'FieldB'
TabOrder = 1
object Field: TImage
Left = 2
Top = 2
Width = 289
Height = 286
Align = alClient
Anchors = []
ParentShowHint = False
ShowHint = False
OnMouseUp = FieldMouseUp
end
end
object MainMenu1: TMainMenu
Left = 362
Top = 258
object Game1: TMenuItem
Caption = '&Field'
object New1: TMenuItem
Caption = '&New'
ShortCut = 113
OnClick = RestartBClick
end
object Open1: TMenuItem
Caption = '&Open...'
ShortCut = 114
OnClick = Open1Click
end
object N1: TMenuItem
Caption = '-'
end
object Verify1: TMenuItem
Caption = '&Verify'
OnClick = BitBtn1Click
end
object SaveField1: TMenuItem
Caption = '&Save Field...'
ShortCut = 16467
OnClick = BitBtn2Click
end
object N5: TMenuItem
Caption = '-'
end
object Exit1: TMenuItem
Caption = '&Exit'
OnClick = Exit1Click
end
end
object Help1: TMenuItem
Caption = '&Help'
object Help2: TMenuItem
Caption = '&Help'
ShortCut = 112
OnClick = Help2Click
end
object N2: TMenuItem
Caption = '-'
end
object AboutRampart1: TMenuItem
Caption = '&About Rampart Field Builder'
ShortCut = 16496
OnClick = AboutRampart1Click
end
end
end
object ImageList1: TImageList
Left = 329
Top = 258
Bitmap = {
3606000003000000424D36060000000000003600000028000000300000001000
0000010010000000000000060000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000F75EF75EEF3DEF3DEF3D0000000000000000000000000000
0000000000000000F75EF75EEF3DEF3DEF3D0000000000000000000000000000
0000000000000000F75EF75EEF3DEF3DEF3D0000000000000000000000000000
00000000F75EF75EEF3D000000000000EF3DEF3DEF3D00000000000000000000
00000000F75EF75EEF3D000000000000EF3DEF3DEF3D00000000000000000000
00000000F75EF75EEF3D000000000000EF3DEF3DEF3D00000000000000000000
0000F75EF75E0000000000000000000000000000EF3DEF3D0000000000000000
0000F75EF75E0000FF7F007CFF7F007CFF7F0000EF3DEF3D0000000000000000
0000F75EF75E0000FF7FE003FF7FE003FF7F0000EF3DEF3D0000000000000000
0000F75E000000000000000000000000000000000000EF3D0000000000000000
0000F75E0000FF7F00000000000000000000FF7F0000EF3D0000000000000000
0000F75E0000FF7F00000000000000000000FF7F0000EF3D0000000000000000
F75EEF3D000000000000E03DE03DE03D000000000000EF3DEF3D000000000000
F75EEF3DFF7F00000000007C003C003C00000000FF7FEF3DEF3D000000000000
F75EEF3DFF7F00000000E003E001E00100000000FF7FEF3DEF3D000000000000
F75E000000000000E03DE03DE03DE03DE03D000000000000EF3D000000000000
F75E0000007C0000007C003C007C003C003C0000007C0000EF3D000000000000
F75E0000E0030000E003E001E003E001E0010000E0030000EF3D000000000000
FF7F000000000000E03DE03DE03DE03DE03D000000000000EF3D000000000000
FF7F0000FF7F0000007C007C007C007C003C0000FF7F0000EF3D000000000000
FF7F0000FF7F0000E003E003E003E003E0010000FF7F0000EF3D000000000000
FF7F000000000000F75EE03DE03DE03DE03D000000000000F75E000000000000
FF7F0000007C0000FF7F007C007C003C007C0000007C0000F75E000000000000
FF7F0000E0030000FF7FE003E003E001E0030000E0030000F75E000000000000
FF7FEF3D000000000000F75EF75EE03D000000000000EF3DF75E000000000000
FF7FEF3DFF7F00000000FF7FFF7F007C00000000FF7FEF3DF75E000000000000
FF7FEF3DFF7F00000000FF7FFF7FE00300000000FF7FEF3DF75E000000000000
0000F75E000000000000000000000000000000000000F75E0000000000000000
0000F75E0000FF7F00000000000000000000FF7F0000F75E0000000000000000
0000F75E0000FF7F00000000000000000000FF7F0000F75E0000000000000000
0000FF7FF75E0000000000000000000000000000F75EF75E0000000000000000
0000FF7FF75E0000FF7F007CFF7F007CFF7F0000F75EF75E0000000000000000
0000FF7FF75E0000FF7FE003FF7FE003FF7F0000F75EF75E0000000000000000
00000000FF7FF75EEF3D000000000000EF3DF75EF75E00000000000000000000
00000000FF7FF75EEF3D000000000000EF3DF75EF75E00000000000000000000
00000000FF7FF75EEF3D000000000000EF3DF75EF75E00000000000000000000
0000000000000000FF7FFF7FFF7FF75EF75E0000000000000000000000000000
0000000000000000FF7FFF7FFF7FF75EF75E0000000000000000000000000000
0000000000000000FF7FFF7FFF7FF75EF75E0000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000000424D
BE000000000000003E0000002800000030000000100000000100010000000000
800000000000000000000000020000000000000000000000FFFFFF00FFFFFFFF
FFFFBA81F83FF83FF83F6A00E00FE00FE00FC300C007C007C007060080038003
8003C7008003800380032801000100010001A601000100010001020000010001
0001C400000100010001BC010001000100010600800380038003C70080038003
80032801C007C007C0072801E00FE00FE00FBC01F83FF83FF83F0200}
end
object SaveDialog1: TSaveDialog
DefaultExt = 'FLD'
Filter = 'Rampart field (*.FLD)|*.FLD'
Left = 297
Top = 258
end
object OpenDialog1: TOpenDialog
DefaultExt = 'FLD'
Filter = 'Rampart field (*.FLD)|*.FLD'
Left = 265
Top = 258
end
end