home *** CD-ROM | disk | FTP | other *** search
- object TipDialog: TTipDialog
- Left = 202
- Top = 102
- BorderStyle = bsDialog
- Caption = 'Tip of the Day'
- ClientHeight = 211
- ClientWidth = 426
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PixelsPerInch = 96
- Position = poScreenCenter
- OnCreate = FormCreate
- OnShow = FormShow
- TextHeight = 13
- object Label1: TLabel
- Left = 19
- Top = 12
- Width = 189
- Height = 24
- Caption = 'Welcome to Calmira'
- Font.Color = clBlack
- Font.Height = -21
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Bevel1: TBevel
- Left = 323
- Top = 137
- Width = 89
- Height = 8
- Shape = bsTopLine
- end
- object CloseBtn: TBitBtn
- Left = 322
- Top = 147
- Width = 89
- Height = 25
- Caption = '&Close'
- Default = True
- TabOrder = 0
- OnClick = CloseBtnClick
- NumGlyphs = 2
- Style = bsNew
- end
- object NextTip: TBitBtn
- Left = 323
- Top = 103
- Width = 89
- Height = 25
- Caption = '&Next tip'
- TabOrder = 1
- OnClick = NextTipClick
- NumGlyphs = 2
- Style = bsNew
- end
- object cbShowDailyTips: TCheckBox
- Left = 20
- Top = 184
- Width = 294
- Height = 17
- Caption = 'Show this screen the first time you run Calmira each day'
- State = cbChecked
- TabOrder = 2
- OnClick = cbShowDailyTipsClick
- end
- object Panel1: TPanel
- Left = 18
- Top = 41
- Width = 294
- Height = 132
- BevelOuter = bvLowered
- Color = 8454111
- TabOrder = 3
- object Label2: TLabel
- Left = 53
- Top = 16
- Width = 90
- Height = 13
- Caption = 'Did you know...'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object TipLabel: TLabel
- Left = 54
- Top = 41
- Width = 227
- Height = 81
- AutoSize = False
- Caption =
- '...your Tip of the Day file (TIPS.TXT) could not be found in Cal' +
- 'mira'#39's home directory'
- WordWrap = True
- end
- object Image1: TImage
- Left = 17
- Top = 9
- Width = 32
- Height = 32
- Picture.Data = {<image000.ico>}
- end
- end
- object HomePage: TBitBtn
- Left = 323
- Top = 71
- Width = 89
- Height = 25
- Caption = 'Home &page'
- TabOrder = 4
- OnClick = HomePageClick
- Style = bsNew
- end
- object BitBtn4: TBitBtn
- Left = 323
- Top = 40
- Width = 89
- Height = 25
- Caption = '&Help'
- TabOrder = 5
- OnClick = BitBtn4Click
- Style = bsNew
- end
- end
-