object CusForm: TCusForm
  Left = 335
  Top = 173
  BorderIcons = [biSystemMenu]
  BorderStyle = bsNone
  ClientHeight = 304
  ClientWidth = 207
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  KeyPreview = True
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 19
    Width = 207
    Height = 285
    Align = alClient
    TabOrder = 0
    object PanelOK: TPanel
      Left = 8
      Top = 255
      Width = 88
      Height = 22
      Caption = 'OK'
      TabOrder = 5
      OnClick = PanelOKClick
      OnMouseDown = PanelOKMouseDown
      OnMouseUp = PanelOKMouseUp
    end
    object CheckBoxBaloon: TCheckBox
      Left = 8
      Top = 233
      Width = 193
      Height = 17
      Caption = 'Show Birthday Balloon'
      TabOrder = 4
      OnKeyDown = EditStKeyDown
    end
    object ListBoxPics: TListBox
      Left = 20
      Top = 61
      Width = 167
      Height = 164
      TabStop = False
      Style = lbOwnerDrawFixed
      BevelKind = bkFlat
      BorderStyle = bsNone
      Columns = 6
      ItemHeight = 26
      TabOrder = 3
      OnClick = ListBoxPicsClick
      OnDrawItem = ListBoxPicsDrawItem
      OnKeyDown = EditStKeyDown
    end
    object CBCusStatus: TComboBox
      Left = 9
      Top = 6
      Width = 47
      Height = 24
      BevelKind = bkFlat
      Style = csOwnerDrawFixed
      Ctl3D = True
      DropDownCount = 12
      ItemHeight = 18
      ParentCtl3D = False
      TabOrder = 0
      OnChange = CBCusStatusChange
      OnDrawItem = CBCusStatusDrawItem
      OnDropDown = CBCusStatusDropDown
      OnKeyDown = EditStKeyDown
    end
    object EditSt: TEdit
      Left = 60
      Top = 7
      Width = 138
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      Ctl3D = True
      MaxLength = 20
      ParentCtl3D = False
      TabOrder = 1
      OnClick = EditStClick
      OnKeyDown = EditStKeyDown
    end
    object PanelCancel: TPanel
      Left = 111
      Top = 255
      Width = 88
      Height = 22
      Caption = 'Cancel'
      TabOrder = 6
      OnClick = PanelCancelClick
      OnMouseDown = PanelOKMouseDown
      OnMouseUp = PanelOKMouseUp
    end
    object EditDesc: TEdit
      Left = 9
      Top = 33
      Width = 189
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      Ctl3D = True
      MaxLength = 1500
      ParentCtl3D = False
      TabOrder = 2
      OnKeyDown = EditStKeyDown
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 207
    Height = 19
    Align = alTop
    TabOrder = 1
    object ImageTitle: TImage
      Left = 1
      Top = 1
      Width = 205
      Height = 17
      Align = alClient
      Stretch = True
      OnMouseDown = ImageTitleMouseDown
    end
    object LabelTitle: TLabel
      Left = 7
      Top = 4
      Width = 3
      Height = 11
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clCaptionText
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
      OnMouseDown = ImageTitleMouseDown
    end
  end
end