home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1997 May
/
Pcwk0597.iso
/
borland
/
cb
/
setup
/
cbuilder
/
data.z
/
SWATMAIN.DFM
/
SWATMAIN.txt
< prev
Wrap
Text File
|
1997-02-28
|
3KB
|
147 lines
object SwatForm: TSwatForm
Left = 212
Top = 128
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Swat!'
ClientHeight = 413
ClientWidth = 282
Color = clSilver
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
Position = poScreenCenter
OnCreate = FormCreate
OnMouseDown = FormMouseDown
OnMouseUp = FormMouseUp
PixelsPerInch = 96
TextHeight = 13
object Image1: TImage
Left = 11
Top = 256
Width = 260
Height = 156
AutoSize = True
Picture.Data = {<image000.bmp>}
end
object GameOverImage: TImage
Left = 10
Top = 72
Width = 262
Height = 145
AutoSize = True
Picture.Data = {<image001.bmp>}
end
object TimeLabel: TLabel
Left = 122
Top = 296
Width = 18
Height = 19
Caption = '00'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object MissLabel: TLabel
Left = 78
Top = 351
Width = 9
Height = 19
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object HitsLabel: TLabel
Left = 41
Top = 351
Width = 9
Height = 19
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object EscapedLabel: TLabel
Left = 134
Top = 351
Width = 9
Height = 19
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object ScoreLabel: TLabel
Left = 205
Top = 351
Width = 9
Height = 19
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object MainMenu1: TMainMenu
object Gamr1: TMenuItem
Caption = '&Game'
ShortCut = 0
object New1: TMenuItem
Caption = '&New'
ShortCut = 0
OnClick = New1Click
end
object Options1: TMenuItem
Caption = '&Options...'
ShortCut = 0
OnClick = Options1Click
end
object Stop1: TMenuItem
Caption = '&Stop'
Enabled = False
ShortCut = 0
OnClick = Stop1Click
end
end
object Pause1: TMenuItem
Caption = '&Pause'
ShortCut = 0
OnClick = Pause1Click
end
object About1: TMenuItem
Caption = '&About'
ShortCut = 0
OnClick = DisplayAbout
end
end
object Timer1: TTimer
Enabled = False
Interval = 100
OnTimer = TimerTick
Left = 32
end
end