home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
GameStar 1998 November (Bonus)
/
GAMESTAR11B.ISO
/
Start_95.exe
/
0
/
RCDATA
/
TSETUPMSG31
/
TSETUPMSG31.txt
Wrap
Text File
|
1998-09-09
|
5KB
|
193 lines
object SetupMsg31: TSetupMsg31
Left = 41
Top = 124
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
ActiveControl = SpeedScrollBar
BorderStyle = bsDialog
Caption = 'Create a new scrolling message'
ClientHeight = 270
ClientWidth = 541
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
PixelsPerInch = 96
Position = poScreenCenter
PrintScale = poNone
Scaled = False
OnActivate = FormActivate
OnCreate = FormCreate
OnDestroy = FormDestroy
TextHeight = 16
object Label3: TLabel
Left = 16
Top = 87
Width = 82
Height = 16
Caption = 'Message Text'
end
object ScrollingMessage: TLabel
Left = 16
Top = 199
Width = 505
Height = 57
AutoSize = False
Color = clBlack
ParentColor = False
Visible = False
end
object Label4: TLabel
Left = 64
Top = 130
Width = 412
Height = 14
Alignment = taCenter
Caption =
'Right mouse button for BackGround colour. Left mouse button for' +
' ForeGround colour'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object GroupBox1: TGroupBox
Left = 15
Top = -2
Width = 433
Height = 88
Caption = ' Speed '
TabOrder = 0
object Label1: TLabel
Left = 382
Top = 22
Width = 28
Height = 16
Caption = 'Slow'
end
object Label2: TLabel
Left = 24
Top = 24
Width = 26
Height = 16
Caption = 'Fast'
end
object Label5: TLabel
Left = 203
Top = 16
Width = 4
Height = 16
end
object SpeedScrollBar: TScrollBar
Left = 24
Top = 48
Width = 388
Height = 25
Max = 11
Min = 1
Position = 6
TabOrder = 0
OnChange = SpeedScrollBarChange
end
end
object NewMsg: TEdit
Left = 16
Top = 103
Width = 504
Height = 24
MaxLength = 254
TabOrder = 1
OnChange = NewMsgChange
end
object Ok: TBitBtn
Left = 451
Top = 5
Width = 81
Height = 28
Caption = 'OK'
Default = True
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ModalResult = 1
ParentFont = False
TabOrder = 2
OnClick = OkClick
Glyph.Data = {
4E010000424D4E01000000000000760000002800000012000000120000000100
040000000000D800000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333330000003333333333333333330000003333344333333333330000003333
4224333333333300000033342222433333333300000033422222243333333300
000034222A2222433333330000003222A3A222433333330000003A2A333A2224
33333300000033A33333A222433333000000333333333A222433330000003333
333333A222433300000033333333333A222433000000333333333333A2224300
00003333333333333A224300000033333333333333A223000000333333333333
333A33000000333333333333333333000000}
Style = bsNew
end
object Cancel: TBitBtn
Left = 451
Top = 32
Width = 81
Height = 27
TabOrder = 3
OnClick = CancelClick
Kind = bkCancel
Style = bsNew
end
object TxtFont: TBitBtn
Left = 451
Top = 58
Width = 81
Height = 28
Caption = '&Font'
TabOrder = 4
OnClick = TxtFontClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333FF3FFFFFFF33FFF003000000033
0000773777777733777703330033033330037FFF77F37F33377F700007330333
3003777777337FFFF77F303003337000007337F77F3377777773303073333033
003337F77F3337F377F337007333303300333777733337FF77F3330033333703
07333377F333377F7733330733333300033333773FF3F3777F33333399393300
033333337737FF777F333333339993307333333333777FF77333333333999930
3333333333777737333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
Style = bsNew
end
object ColorGrid: TColorGrid
Left = 16
Top = 143
Width = 504
Height = 56
Ctl3D = True
GridOrdering = go8x2
ParentCtl3D = False
TabOrder = 5
OnChange = ColorGridChange
end
object FontDialog: TFontDialog
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'System'
Font.Style = []
MinFontSize = 0
MaxFontSize = 0
Left = 464
Top = 224
end
object ColorDialog: TColorDialog
Options = [cdPreventFullOpen]
Left = 488
Top = 224
end
end