home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 January / Chip_2003-01_cd1.bin / zkuste / delphi / kompon / d23456 / COOLTRAY.ZIP / demos / StartHidden / Main.dfm / Main.txt < prev   
Text File  |  2002-04-06  |  2KB  |  83 lines
  1. object MainForm: TMainForm
  2.   Left = 360
  3.   Top = 379
  4.   BorderIcons = [biSystemMenu, biMinimize]
  5.   BorderStyle = bsSingle
  6.   Caption = 'Start Hidden?'
  7.   ClientHeight = 175
  8.   ClientWidth = 249
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   OldCreateOrder = False
  16.   Position = poDesktopCenter
  17.   PixelsPerInch = 96
  18.   TextHeight = 13
  19.   object Label1: TLabel
  20.     Left = 8
  21.     Top = 8
  22.     Width = 233
  23.     Height = 26
  24.     AutoSize = False
  25.     Caption = 
  26.       'This demo demonstrates how to determine if the main form should ' +
  27.       'be visible at application startup.'
  28.     WordWrap = True
  29.   end
  30.   object Label2: TLabel
  31.     Left = 8
  32.     Top = 42
  33.     Width = 233
  34.     Height = 39
  35.     AutoSize = False
  36.     Caption = 
  37.       'Set the checkbox below, then close the app. Next time you start ' +
  38.       'the app. it will remember the setting.'
  39.     WordWrap = True
  40.   end
  41.   object Label3: TLabel
  42.     Left = 8
  43.     Top = 90
  44.     Width = 233
  45.     Height = 39
  46.     AutoSize = False
  47.     Caption = 
  48.       'Notice that the form'#39's Visible property must be false for this t' +
  49.       'o work. You will probably also want to set the tray icon'#39's IconV' +
  50.       'isible property to true.'
  51.     WordWrap = True
  52.   end
  53.   object CheckBox1: TCheckBox
  54.     Left = 8
  55.     Top = 148
  56.     Width = 133
  57.     Height = 17
  58.     Caption = '&Start hidden next time'
  59.     TabOrder = 0
  60.     OnClick = CheckBox1Click
  61.   end
  62.   object Button1: TButton
  63.     Left = 164
  64.     Top = 142
  65.     Width = 75
  66.     Height = 25
  67.     Caption = 'E&xit'
  68.     TabOrder = 1
  69.     OnClick = Button1Click
  70.   end
  71.   object CoolTrayIcon1: TCoolTrayIcon
  72.     CycleInterval = 0
  73.     Hint = 'StartHidden Demo'
  74.     Icon.Data = {<image000.ico>}
  75.     IconVisible = True
  76.     IconIndex = 0
  77.     OnMouseDown = CoolTrayIcon1MouseDown
  78.     OnStartup = CoolTrayIcon1Startup
  79.     Left = 132
  80.     Top = 126
  81.   end
  82. end
  83.