fedits.xfm

East make Tray Icon in delphi

object Form1: TForm1
  Left = 310
  Top = 275
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = fbsSingle
  Caption = 'Edits demo'
  ClientHeight = 144
  ClientWidth = 338
  Color = clBtnFace
  DefaultMonitor = dmDesktop
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 13
  object JvFilenameBox1: TJvFilenameEdit
    Left = 18
    Top = 8
    Width = 307
    Height = 21
    AddQuotes = False
    ButtonFlat = False
    TabOrder = 0
  end
  object JvDirectoryBox1: TJvDirectoryEdit
    Left = 18
    Top = 30
    Width = 307
    Height = 21
    ButtonFlat = False
    TabOrder = 1
  end
  object JvButtonBox1: TJvComboEdit
    Left = 18
    Top = 74
    Width = 307
    Height = 21
    ButtonFlat = False
    ImageKind = ikEllipsis
    TabOrder = 3
    OnButtonClick = JvButtonBox1ButtonClick
  end
  object JvDateEdit1: TJvDateEdit
    Left = 18
    Top = 53
    Width = 307
    Height = 21
    ButtonFlat = False
    TabOrder = 2
  end
  object JvCalcEdit1: TJvCalcEdit
    Left = 18
    Top = 96
    Width = 307
    Height = 21
    AutoSize = False
    FormatOnEditing = True
    TabOrder = 4
  end
end