home *** CD-ROM | disk | FTP | other *** search
- object NotifyForm: TNotifyForm
- Left = 164
- Top = 97
- BorderStyle = bsNone
- Caption = 'Mail!'
- ClientHeight = 47
- ClientWidth = 116
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Scaled = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnHide = FormHide
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 11
- Width = 116
- Height = 36
- Align = alClient
- BevelOuter = bvLowered
- TabOrder = 0
- object LMDFill3: TLMDFill
- Left = 1
- Top = 1
- Width = 114
- Height = 34
- Align = alClient
- Bevel.Mode = bmCustom
- Bevel.StandardStyle = lsSingleLowered
- Caption.Font.Charset = DEFAULT_CHARSET
- Caption.Font.Color = clWindowText
- Caption.Font.Height = -11
- Caption.Font.Name = 'MS Sans Serif'
- Caption.Font.Style = []
- FillObject.Style = sfBitmap
- end
- object RxSpeedButton1: TRxSpeedButton
- Left = 40
- Top = 2
- Width = 46
- Height = 32
- DropDownMenu = PopupMenu1
- Caption = 'Mail'
- Flat = True
- Transparent = True
- end
- object Animate1: TAnimate
- Left = 4
- Top = 2
- Width = 32
- Height = 32
- Active = False
- FileName = 'D:\TMail3\Ver4\Working.avi'
- StopFrame = 30
- Transparent = False
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 0
- Width = 116
- Height = 11
- Align = alTop
- Alignment = taLeftJustify
- BevelOuter = bvNone
- Caption = 'New Mail...'
- Color = clActiveCaption
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clCaptionText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- OnMouseDown = Panel2MouseDown
- end
- object PopupMenu1: TPopupMenu
- Left = 56
- Top = 32
- object Viewlistofnewmessages1: TMenuItem
- Caption = '&View list of new messages'
- OnClick = Viewlistofnewmessages1Click
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object Close1: TMenuItem
- Caption = 'Close!'
- OnClick = Close1Click
- end
- end
- object KTop1: TKTop
- KTop = False
- Left = 64
- Top = 32
- end
- object MultiLang1: TMultiLang
- Languages = 2
- Words.Strings = (
- '%Form%'
- 'Mail!'
- 'P�stur'
- 'Panel1'
- ''
- ''
- 'LMDFill3'
- ''
- ''
- 'RxSpeedButton1'
- 'Mail'
- 'P�stur'
- 'Viewlistofnewmessages1'
- '&View list of new messages'
- '&Sko�a lista yfir n�jan p�st ...'
- 'N1'
- '-'
- '-'
- 'Close1'
- 'Close!'
- 'Loka!'
- 'Panel2'
- 'New Mail...'
- 'N�r p�stur...')
- Left = 72
- Top = 19
- end
- end
-