home *** CD-ROM | disk | FTP | other *** search
- object formNewRunValue: TformNewRunValue
- Left = 300
- Top = 250
- BorderStyle = bsDialog
- BorderWidth = 4
- Caption = 'New Run value'
- ClientHeight = 278
- ClientWidth = 323
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 13
- object radiogroupRootKey: TRadioGroup
- Left = 0
- Top = 0
- Width = 323
- Height = 65
- Align = alTop
- Caption = ' Valid for... (root key) '
- ItemIndex = 0
- Items.Strings = (
- 'Create for current user only (HKEY_CURRENT_USER)'
- 'Create for all users (HKEY_LOCAL_MACHINE)')
- TabOrder = 0
- end
- object radiogroupKey: TRadioGroup
- Left = 0
- Top = 73
- Width = 323
- Height = 88
- Align = alTop
- Caption = ' Type of program (key) '
- ItemIndex = 0
- Items.Strings = (
- 'Create a link to a normal program (Run)'
- 'Create a link to a service program (RunServices)'
- 'Create a Autostart group link')
- TabOrder = 1
- end
- object panelButtons: TPanel
- Left = 0
- Top = 244
- Width = 323
- Height = 34
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 3
- DesignSize = (
- 323
- 34)
- object buttonCancel: TBitBtn
- Left = 120
- Top = 8
- Width = 91
- Height = 25
- Anchors = [akTop, akRight]
- Caption = 'Cancel'
- TabOrder = 0
- Kind = bkCancel
- end
- object buttonOK: TBitBtn
- Left = 224
- Top = 8
- Width = 91
- Height = 25
- Anchors = [akTop, akRight]
- TabOrder = 1
- Kind = bkOK
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 65
- Width = 323
- Height = 8
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 4
- end
- object Panel3: TPanel
- Left = 0
- Top = 161
- Width = 323
- Height = 8
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 5
- end
- object groupValueData: TGroupBox
- Left = 0
- Top = 169
- Width = 323
- Height = 75
- Align = alClient
- Caption = ' Registry entry (value && data) '
- TabOrder = 2
- DesignSize = (
- 323
- 75)
- object labelValue: TLabel
- Left = 8
- Top = 20
- Width = 62
- Height = 13
- Caption = 'Name of link:'
- end
- object labelData: TLabel
- Left = 8
- Top = 40
- Width = 51
- Height = 13
- Caption = 'Linked file:'
- end
- object eValue: TEdit
- Left = 112
- Top = 16
- Width = 198
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- TabOrder = 0
- end
- object eData: TEdit
- Left = 112
- Top = 40
- Width = 179
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- TabOrder = 1
- end
- object buttonBrowse: TButton
- Left = 290
- Top = 40
- Width = 21
- Height = 21
- Anchors = [akTop, akRight]
- Caption = '...'
- TabOrder = 2
- OnClick = buttonBrowseClick
- end
- end
- object od: TOpenDialog
- Filter = 'All files|*.*'
- Left = 32
- Top = 24
- end
- end
-