home *** CD-ROM | disk | FTP | other *** search
- object LogForm: TLogForm
- Left = 200
- Top = 102
- Width = 472
- Height = 332
- BorderIcons = [biSystemMenu, biMaximize]
- Caption = 'Account Log'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- OnActivate = FormActivate
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object BottomPanel: TPanel
- Left = 0
- Top = 257
- Width = 464
- Height = 41
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 0
- object Button1: TButton
- Left = 8
- Top = 8
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 0
- end
- object bClear: TButton
- Left = 104
- Top = 8
- Width = 75
- Height = 25
- Caption = 'Clear'
- TabOrder = 1
- OnClick = bClearClick
- end
- object cbHighlight: TCheckBox
- Left = 200
- Top = 12
- Width = 265
- Height = 17
- Caption = '&Highlights only'
- TabOrder = 2
- OnClick = cbHighlightClick
- end
- end
- object eLog: TTextEditor
- Left = 0
- Top = 0
- Width = 464
- Height = 257
- BgColor = clBlack
- TextColor = clBlack
- SelColor = clBlack
- SelBgColor = clBlack
- QuoteColor = clBlack
- RefColor = clBlack
- Kludge1Color = clBlack
- Kludge2Color = clBlack
- Kludge3Color = clBlack
- ReadOnly = False
- FontCharset = 1
- TabOrder = 1
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Pitch = fpFixed
- Font.Style = []
- Align = alClient
- PopupMenu = PopupMenu1
- end
- object lImages: TImageList
- Left = 312
- Top = 264
- end
- object PopupMenu1: TPopupMenu
- OnPopup = PopupMenu1Popup
- Left = 160
- Top = 40
- object mCopy: TMenuItem
- Caption = '&Copy'
- OnClick = mCopyClick
- end
- object mSelectAll: TMenuItem
- Caption = '&Select all'
- OnClick = mSelectAllClick
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object Close: TMenuItem
- Caption = 'Close'
- ShortCut = 27
- Visible = False
- OnClick = CloseClick
- end
- object mHighlights: TMenuItem
- Caption = '&Highlights only'
- OnClick = mHighlightsClick
- end
- end
- end
-