PC World Komputer 1999 January/pcwk_01_1999.iso/Tajnepp/CPUIDLE/CPUIDLE.EXE/0/RCDATA/TFORMABOUT/TFORMABOUT.txt

Text File | 1998-07-08 | 12.7 KB | 522 lines

object FormAbout: TFormAbout
  Left = 214
  Top = 91
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'About CpuIdle'
  ClientHeight = 269
  ClientWidth = 281
  Color = clWhite
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 283
    Height = 271
    ActivePage = SheetAbout
    TabOrder = 1
    object SheetAbout: TTabSheet
      Caption = 'About'
      object LabelActive: TLabel
        Left = 8
        Top = 41
        Width = 89
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = 'enabled'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object LabelInactive: TLabel
        Left = 8
        Top = 41
        Width = 89
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = 'disabled'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object LabelTitle: TLabel
        Left = 104
        Top = 8
        Width = 73
        Height = 13
        Caption = 'CpuIdle 3.02'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label2: TLabel
        Left = 104
        Top = 24
        Width = 159
        Height = 13
        Caption = 'Copyright (c) 1998 Andreas Goetz'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object UrlLabel1: TUrlLabel
        Left = 104
        Top = 40
        Width = 165
        Height = 13
        Cursor = 5
        Caption = 'www.stud.uni-hannover.de/~goetz'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsUnderline]
        ParentFont = False
        PopupMenu = UrlLabel1.
        URL = 'http://www.stud.uni-hannover.de/~goetz/'
      end
      object Label3: TLabel
        Left = 8
        Top = 72
        Width = 257
        Height = 73
        AutoSize = False
        Caption =
          'CpuIdle  runs a HLT command in an idle priority thread under Win' +
          '95. That allows modern microprocessors like Intel  P5 / P5 MMX /' +
          ' PPro / PII, AMD K5 / K6 or Cyrix M1 / M2 to save power and stay' +
          ' cool.'
        WordWrap = True
      end
      object Image1: TImage
        Left = 8
        Top = 8
        Width = 87
        Height = 30
        Cursor = crHandPoint
        AutoSize = True
        Picture.Data = {<image000.bmp>}
        OnDblClick = TrayDblClick
      end
      object GroupBox2: TGroupBox
        Left = 9
        Top = 140
        Width = 256
        Height = 53
        Caption = 'Thanks'
        TabOrder = 0
        object Label10: TLabel
          Left = 16
          Top = 16
          Width = 225
          Height = 33
          AutoSize = False
          Caption =
            'Special thanks to                       . He wrote the original ' +
            'VxD and made this program possible.'
          WordWrap = True
        end
        object Label11: TLabel
          Left = 102
          Top = 16
          Width = 64
          Height = 13
          Caption = 'Virgil Smith'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
      end
    end
    object CpuSheet: TTabSheet
      Caption = 'CPU Info'
      object LabelUnknown: TLabel
        Left = 8
        Top = 32
        Width = 75
        Height = 55
        Alignment = taCenter
        AutoSize = False
        Caption = '?'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -48
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object ImageCPU: TImage
        Left = 8
        Top = 32
        Width = 75
        Height = 40
        AutoSize = True
        Picture.Data = {<image001.bmp>}
        Visible = False
      end
      object LabelPowered: TLabel
        Left = 8
        Top = 8
        Width = 59
        Height = 13
        Caption = 'Powered by:'
      end
      object LabelClock: TLabel
        Left = 104
        Top = 27
        Width = 161
        Height = 38
        AutoSize = False
        Caption = 'X'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -24
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object LabelID: TLabel
        Left = 0
        Top = 8
        Width = 280
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = 'CPUID instruction not available on this machine.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Memo2: TMemo
        Left = 104
        Top = 56
        Width = 161
        Height = 145
        TabStop = False
        BorderStyle = bsNone
        ReadOnly = True
        TabOrder = 0
        Visible = False
        WantReturns = False
      end
    end
    object SheetGreet: TTabSheet
      Caption = 'Greetings'
      object Label14: TLabel
        Left = 8
        Top = 133
        Width = 259
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = 'Andreas Goetz, S�dring 11, 31275 Lehrte, Germany'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Memo3: TMemo
        Left = 8
        Top = 8
        Width = 262
        Height = 121
        BorderStyle = bsNone
        Lines.Strings = (
          'CpuIdle is released as freeware for non-commercial use. '
          'However, if you like this program and would like to '
          'encourage further development and express your '
          'gratitude, a monetary donation would be greatly '
          'appreciated. A $20 contribution sent to the address '
          'given below entitles the donor to additional assistance '
          'in using this software if necessary. Please don'#39't send '
          'cheques since cashing is extremely expensive in '
          'Germany.')
        ReadOnly = True
        TabOrder = 1
      end
      object GroupBox1: TGroupBox
        Left = 8
        Top = 152
        Width = 257
        Height = 49
        Caption = 'Greetings'
        TabOrder = 0
        object Label4: TLabel
          Left = 16
          Top = 20
          Width = 217
          Height = 13
          AutoSize = False
          Caption = 'A big hello and my nicest hug go to               .'
        end
        object Label5: TLabel
          Left = 184
          Top = 20
          Width = 42
          Height = 13
          Caption = 'Muddle'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
      end
    end
    object SheetDebug: TTabSheet
      Caption = 'Debug'
      TabVisible = False
      object Label1: TLabel
        Left = 16
        Top = 96
        Width = 26
        Height = 13
        Caption = 'Index'
      end
      object Label6: TLabel
        Left = 16
        Top = 144
        Width = 23
        Height = 13
        Caption = 'Data'
      end
      object Label7: TLabel
        Left = 8
        Top = 72
        Width = 161
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = 'Warning: Use at your own risk!'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object EditIndex: TEdit
        Left = 16
        Top = 112
        Width = 145
        Height = 21
        CharCase = ecUpperCase
        TabOrder = 0
        Text = '0'
      end
      object EditData: TEdit
        Left = 16
        Top = 160
        Width = 145
        Height = 21
        CharCase = ecUpperCase
        TabOrder = 1
        Text = '0'
      end
      object ButtonRead: TButton
        Left = 184
        Top = 107
        Width = 75
        Height = 25
        Caption = '&Read'
        TabOrder = 2
        OnClick = ButtonReadClick
      end
      object ButtonWrite: TButton
        Left = 184
        Top = 155
        Width = 75
        Height = 25
        Caption = '&Write'
        TabOrder = 3
        OnClick = ButtonWriteClick
      end
      object RadioRegister: TRadioGroup
        Left = 184
        Top = 8
        Width = 81
        Height = 81
        Caption = ' Register '
        ItemIndex = 0
        Items.Strings = (
          'MSR'#39's'
          'CCR'#39's')
        TabOrder = 4
      end
      object GroupBox3: TGroupBox
        Left = 8
        Top = 8
        Width = 161
        Height = 57
        Caption = ' Mode '
        TabOrder = 5
        object Hex: TRadioButton
          Left = 16
          Top = 24
          Width = 49
          Height = 17
          Caption = 'Hex'
          Checked = True
          TabOrder = 0
          TabStop = True
          OnClick = NumericClick
        end
        object Bin: TRadioButton
          Left = 64
          Top = 24
          Width = 41
          Height = 17
          Caption = 'Bin'
          TabOrder = 1
          OnClick = NumericClick
        end
        object Dec: TRadioButton
          Left = 104
          Top = 24
          Width = 49
          Height = 17
          Caption = 'Dec'
          TabOrder = 2
          OnClick = NumericClick
        end
      end
    end
    object SheetControl: TTabSheet
      Caption = 'Control Panel'
      object Label8: TLabel
        Left = 8
        Top = 8
        Width = 257
        Height = 33
        AutoSize = False
        Caption =
          'Choose if you want to have CpuIdle Control Panel plugin installe' +
          'd:'
        WordWrap = True
      end
      object Label9: TLabel
        Left = 8
        Top = 88
        Width = 26
        Height = 13
        Caption = 'Note:'
      end
      object Label12: TLabel
        Left = 40
        Top = 88
        Width = 225
        Height = 105
        AutoSize = False
        Caption =
          'Changes will only take effect after you restart Windows. Press O' +
          'K to apply. If you use Control Panel plugin there is no need to ' +
          'start CpuIdle manually. See Control Panel / Energy for more info' +
          'rmation.'
        WordWrap = True
      end
      object CheckBoxPanelPlugin: TCheckBox
        Left = 24
        Top = 48
        Width = 225
        Height = 17
        Caption = 'Enable CpuIdle Control Panel plugin'
        TabOrder = 0
      end
    end
  end
  object ButtonOK: TButton
    Left = 96
    Top = 232
    Width = 81
    Height = 25
    Cancel = True
    Caption = '&OK'
    TabOrder = 0
    OnClick = ButtonOKClick
  end
  object Timer: TTimer
    Enabled = False
    Interval = 3000
    OnTimer = TimerTimer
    Left = 256
    Top = 65528
  end
  object Tray: TTrayIcon
    Enabled = True
    ShowDesigning = False
    Icon.Data = {<image002.ico>}
    OnDblClick = TrayDblClick
    PopupMenu = PopupMenu1
    Left = 40
    Top = 232
  end
  object PopupMenu1: TPopupMenu
    OnPopup = PopupMenu1Popup
    Left = 8
    Top = 232
    object Hide1: TMenuItem
      Caption = '&Hide'
      OnClick = Hide1Click
    end
    object Enabled1: TMenuItem
      Caption = '&Enabled'
      Checked = True
      OnClick = TrayDblClick
    end
    object SlowClock1: TMenuItem
      Caption = '&Slow Clock'
      Visible = False
    end
    object About1: TMenuItem
      Caption = '&About...'
      OnClick = About1Click
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Exit1: TMenuItem
      Caption = 'E&xit'
      OnClick = Exit1Click
    end
  end
  object ImageList: TImageList
    Left = 224
    Top = 65528
  end
end