Chip 2002 March/Chip_2002-03_cd1.bin/zkuste/delphi/kompon/d56/MSYSINFO.ZIP/Demos/GUI/EventLogProps.dfm

Text File | 2002-01-04 | 4.7 KB | 212 lines

object propEventLog: TpropEventLog
  Left = 0
  Top = 0
  Width = 392
  Height = 422
  Align = alClient
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  ParentFont = False
  TabOrder = 0
  Visible = False
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 392
    Height = 422
    ActivePage = tsEvent
    Align = alClient
    TabOrder = 0
    object tsEvent: TTabSheet
      Caption = ' Event '
      object lType: TLabel
        Left = 38
        Top = 63
        Width = 28
        Height = 13
        Alignment = taRightJustify
        Caption = 'Type:'
        FocusControl = stType
      end
      object lTime: TLabel
        Left = 40
        Top = 41
        Width = 26
        Height = 13
        Alignment = taRightJustify
        Caption = 'Time:'
        FocusControl = stTime
      end
      object lDate: TLabel
        Left = 39
        Top = 20
        Width = 27
        Height = 13
        Alignment = taRightJustify
        Caption = 'Date:'
        FocusControl = stDate
      end
      object lComputer: TLabel
        Left = 15
        Top = 105
        Width = 51
        Height = 13
        Alignment = taRightJustify
        Caption = 'Computer:'
        FocusControl = stComputer
      end
      object lUser: TLabel
        Left = 40
        Top = 84
        Width = 26
        Height = 13
        Alignment = taRightJustify
        Caption = 'User:'
        FocusControl = stUser
      end
      object lID: TLabel
        Left = 196
        Top = 63
        Width = 46
        Height = 13
        Alignment = taRightJustify
        Caption = 'Event ID:'
        FocusControl = stID
      end
      object lCatg: TLabel
        Left = 193
        Top = 42
        Width = 49
        Height = 13
        Alignment = taRightJustify
        Caption = 'Category:'
        FocusControl = stCatg
      end
      object lSource: TLabel
        Left = 205
        Top = 20
        Width = 37
        Height = 13
        Alignment = taRightJustify
        Caption = 'Source:'
        FocusControl = stSource
      end
      object lDesc: TLabel
        Left = 17
        Top = 140
        Width = 57
        Height = 13
        Caption = 'Description:'
        FocusControl = mDesc
      end
      object lData: TLabel
        Left = 17
        Top = 247
        Width = 27
        Height = 13
        Caption = 'Data:'
        FocusControl = mData
      end
      object stType: TStaticText
        Left = 71
        Top = 63
        Width = 67
        Height = 17
        Caption = 'Not Available'
        TabOrder = 0
      end
      object stTime: TStaticText
        Left = 71
        Top = 41
        Width = 67
        Height = 17
        Caption = 'Not Available'
        TabOrder = 1
      end
      object stDate: TStaticText
        Left = 71
        Top = 20
        Width = 67
        Height = 17
        Caption = 'Not Available'
        TabOrder = 2
      end
      object stComputer: TStaticText
        Left = 71
        Top = 105
        Width = 67
        Height = 17
        Caption = 'Not Available'
        TabOrder = 3
      end
      object stUser: TStaticText
        Left = 71
        Top = 84
        Width = 67
        Height = 17
        Caption = 'Not Available'
        TabOrder = 4
      end
      object stID: TStaticText
        Left = 247
        Top = 63
        Width = 67
        Height = 17
        Caption = 'Not Available'
        TabOrder = 5
      end
      object stCatg: TStaticText
        Left = 247
        Top = 42
        Width = 67
        Height = 17
        Caption = 'Not Available'
        TabOrder = 6
      end
      object stSource: TStaticText
        Left = 247
        Top = 20
        Width = 67
        Height = 17
        Caption = 'Not Available'
        TabOrder = 7
      end
      object mDesc: TMemo
        Left = 17
        Top = 154
        Width = 350
        Height = 84
        Color = clBtnFace
        Lines.Strings = (
          ' ')
        ReadOnly = True
        ScrollBars = ssVertical
        TabOrder = 8
        WantReturns = False
      end
      object mData: TMemo
        Left = 17
        Top = 263
        Width = 350
        Height = 118
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Courier New'
        Font.Style = []
        Lines.Strings = (
          ' ')
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssVertical
        TabOrder = 9
        WordWrap = False
      end
    end
  end
end