mainfrm.xfm

East make Tray Icon in delphi

object Form1: TForm1
  Left = 453
  Top = 128
  Anchors = [akRight, akBottom]
  BorderStyle = fbsDialog
  Caption = 'JvCheckbox and JvRadioButton Demo'
  ClientHeight = 367
  ClientWidth = 476
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Shell Dlg 2'
  Font.Style = []
  OldCreateOrder = False
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 13
  object lblOption1: TJvLabel
    Left = 254
    Top = 104
    Width = 165
    Height = 52
    Caption =
      'This is option 1 and should only be enabled when the correspondi' +
      'ng radiobutton is  checked.'
    WordWrap = True
    AutoOpenURL = False
    HotTrackFont.Charset = DEFAULT_CHARSET
    HotTrackFont.Color = clWindowText
    HotTrackFont.Height = -11
    HotTrackFont.Name = 'MS Shell Dlg 2'
    HotTrackFont.Style = []
    Images = ImageList1
    ImageIndex = 3
  end
  object lblOption2: TJvLabel
    Left = 254
    Top = 200
    Width = 190
    Height = 40
    Caption =
      'This is option 2 and should only be enabled when the correspondi' +
      'ng radiobutton is  checked.'
    Enabled = False
    WordWrap = True
    AutoOpenURL = False
    HotTrackFont.Charset = DEFAULT_CHARSET
    HotTrackFont.Color = clWindowText
    HotTrackFont.Height = -11
    HotTrackFont.Name = 'MS Shell Dlg 2'
    HotTrackFont.Style = []
    Images = ImageList1
    ImageIndex = 3
  end
  object lblOption3: TJvLabel
    Left = 254
    Top = 296
    Width = 190
    Height = 40
    Caption =
      'This is option 3 and should only be enabled when the correspondi' +
      'ng radiobutton is  checked.'
    Enabled = False
    WordWrap = True
    AutoOpenURL = False
    HotTrackFont.Charset = DEFAULT_CHARSET
    HotTrackFont.Color = clWindowText
    HotTrackFont.Height = -11
    HotTrackFont.Name = 'MS Shell Dlg 2'
    HotTrackFont.Style = []
    Images = ImageList1
    ImageIndex = 3
  end
  object lblPrefix: TJvLabel
    Left = 42
    Top = 168
    Width = 117
    Height = 40
    Caption = 'This label is only enabled when the edit box is enabled.'
    Enabled = False
    WordWrap = True
    AutoOpenURL = False
    HotTrackFont.Charset = DEFAULT_CHARSET
    HotTrackFont.Color = clWindowText
    HotTrackFont.Height = -11
    HotTrackFont.Name = 'MS Shell Dlg 2'
    HotTrackFont.Style = []
    Images = ImageList1
    ImageIndex = 2
  end
  object chkShowToolTips: TJvCheckBox
    Left = 18
    Top = 86
    Width = 89
    Height = 17
    Caption = 'Show &tooltips:'
    Checked = True
    State = cbChecked
    TabOrder = 0
    LinkedControls = <
      item
        Control = chkShowPrefix
      end>
    HotTrack = True
    HotTrackFont.Charset = DEFAULT_CHARSET
    HotTrackFont.Color = clWindowText
    HotTrackFont.Height = -11
    HotTrackFont.Name = 'MS Shell Dlg 2'
    HotTrackFont.Style = [fsBold]
  end
  object edPrefix: TJvEdit
    Left = 42
    Top = 134
    Width = 125
    Height = 21
    PasswordChar = #0
    GroupIndex = -1
    MaxPixel.Font.Charset = DEFAULT_CHARSET
    MaxPixel.Font.Color = clWindowText
    MaxPixel.Font.Height = -11
    MaxPixel.Font.Name = 'MS Sans Serif'
    MaxPixel.Font.Style = []
    Modified = False
    Enabled = False
    TabOrder = 1
    Text = 'Hint:'
  end
  object rbOption1: TJvRadioButton
    Left = 230
    Top = 84
    Width = 66
    Height = 17
    Cursor = crHandPoint
    Alignment = taLeftJustify
    Caption = 'Option &1:'
    Checked = True
    TabOrder = 2
    TabStop = True
    HotTrack = True
    HotTrackFont.Charset = DEFAULT_CHARSET
    HotTrackFont.Color = clNavy
    HotTrackFont.Height = -11
    HotTrackFont.Name = 'MS Shell Dlg 2'
    HotTrackFont.Style = [fsUnderline]
    LinkedControls = <
      item
        Control = lblOption1
      end>
  end
  object rbOption2: TJvRadioButton
    Left = 230
    Top = 180
    Width = 66
    Height = 17
    Cursor = crHandPoint
    Alignment = taLeftJustify
    Caption = 'Option &2:'
    TabOrder = 3
    HotTrack = True
    HotTrackFont.Charset = DEFAULT_CHARSET
    HotTrackFont.Color = clNavy
    HotTrackFont.Height = -11
    HotTrackFont.Name = 'MS Shell Dlg 2'
    HotTrackFont.Style = [fsUnderline]
    LinkedControls = <
      item
        Control = lblOption2
      end>
  end
  object rbOption3: TJvRadioButton
    Left = 230
    Top = 270
    Width = 66
    Height = 17
    Cursor = crHandPoint
    Alignment = taLeftJustify
    Caption = 'Option &3:'
    TabOrder = 4
    HotTrack = True
    HotTrackFont.Charset = DEFAULT_CHARSET
    HotTrackFont.Color = clNavy
    HotTrackFont.Height = -11
    HotTrackFont.Name = 'MS Shell Dlg 2'
    HotTrackFont.Style = [fsUnderline]
    LinkedControls = <
      item
        Control = lblOption3
      end>
  end
  object pnlInfo: TPanel
    Left = 0
    Top = 0
    Width = 476
    Height = 63
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Caption = ' '
    Color = clWindow
    TabOrder = 5
    object lblInfo: TJvLabel
      Left = 14
      Top = 16
      Width = 422
      Height = 26
      Caption =
        'This demo shows how LinkedControls can be nested (the checkboxes' +
        ') and how it works with exclusive selection (the radiobuttons).'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Shell Dlg 2'
      Font.Style = [fsBold]
      Anchors = [akLeft, akTop, akRight, akBottom]
      Layout = tlCenter
      ParentFont = False
      WordWrap = True
      AutoOpenURL = False