home *** CD-ROM | disk | FTP | other *** search
- object TipForm: TTipForm
- Left = 238
- Top = 242
- ActiveControl = Panel1
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Welcome'
- ClientHeight = 310
- ClientWidth = 545
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -14
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- Position = poScreenCenter
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 16
- object TipHeader: TLabel
- Left = 15
- Top = 10
- Width = 395
- Height = 34
- AutoSize = False
- Caption = 'Welcome to Visual IRC '#39'97'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -28
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Bevel1: TBevel
- Left = 423
- Top = 241
- Width = 110
- Height = 11
- Shape = bsBottomLine
- end
- object Panel1: TPanel
- Left = 15
- Top = 54
- Width = 395
- Height = 198
- BevelOuter = bvLowered
- Color = 14614527
- TabOrder = 0
- object TipText: TLabel
- Left = 84
- Top = 84
- Width = 291
- Height = 99
- AutoSize = False
- Caption = 'TipText'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Image1: TImage
- Left = 20
- Top = 25
- Width = 36
- Height = 36
- AutoSize = True
- Center = True
- Picture.Data = {<image000.bmp>}
- end
- object TipHelp: TLabel
- Left = 84
- Top = 34
- Width = 291
- Height = 36
- AutoSize = False
- Caption = 'Did you know...'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- WordWrap = True
- end
- end
- object ShowAtStart: TCheckBox
- Left = 15
- Top = 271
- Width = 395
- Height = 21
- Caption = 'Show this Welcome Screen next time you start ViRC '#39'97'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -14
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 1
- end
- object CloseBtn: TNashButton
- Left = 423
- Top = 260
- Width = 110
- Height = 29
- Caption = '&Close'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -14
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = CloseBtnClick
- Kind = bkAbort
- HoverFont.Charset = DEFAULT_CHARSET
- HoverFont.Color = clRed
- HoverFont.Height = -13
- HoverFont.Name = 'MS Sans Serif'
- HoverFont.Style = [fsUnderline]
- HoverHighlight = True
- end
- object Next: TNashButton
- Left = 423
- Top = 56
- Width = 110
- Height = 29
- Caption = '&Next Tip'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = NextClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 33333FF3333333333333447333333333333377FFF33333333333744473333333
- 333337773FF3333333333444447333333333373F773FF3333333334444447333
- 33333373F3773FF3333333744444447333333337F333773FF333333444444444
- 733333373F3333773FF333334444444444733FFF7FFFFFFF77FF999999999999
- 999977777777777733773333CCCCCCCCCC3333337333333F7733333CCCCCCCCC
- 33333337F3333F773333333CCCCCCC3333333337333F7733333333CCCCCC3333
- 333333733F77333333333CCCCC333333333337FF7733333333333CCC33333333
- 33333777333333333333CC333333333333337733333333333333}
- NumGlyphs = 2
- HoverFont.Charset = DEFAULT_CHARSET
- HoverFont.Color = clBlue
- HoverFont.Height = -13
- HoverFont.Name = 'MS Sans Serif'
- HoverFont.Style = [fsUnderline]
- HoverHighlight = True
- end
- object Panel2: TPanel
- Left = 423
- Top = 121
- Width = 110
- Height = 94
- BevelOuter = bvLowered
- BevelWidth = 2
- TabOrder = 4
- object Image2: TImage
- Left = 2
- Top = 2
- Width = 106
- Height = 90
- Align = alClient
- Picture.Data = {<image001.bmp>}
- Stretch = True
- end
- end
- object TTimer
- Interval = 50
- Left = 480
- Top = 12
- end
- object FocusTimer: TTimer
- Enabled = False
- Interval = 100
- OnTimer = FocusTimerTimer
- Left = 330
- Top = 209
- end
- end
-