home *** CD-ROM | disk | FTP | other *** search
- object SetVar: TSetVar
- Left = 343
- Top = 118
- ActiveControl = OKBtn
- BorderIcons = [biSystemMenu]
- BorderStyle = bsSingle
- Caption = 'Set variable'
- ClientHeight = 94
- ClientWidth = 544
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- Position = poScreenCenter
- OnActivate = FormActivate
- PixelsPerInch = 96
- TextHeight = 14
- object Label1: TLabel
- Left = 35
- Top = 40
- Width = 50
- Height = 14
- Caption = 'expession'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object Label2: TLabel
- Left = 59
- Top = 8
- Width = 26
- Height = 14
- Alignment = taRightJustify
- Caption = 'value'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object lbValue: TLabel
- Left = 50
- Top = 8
- Width = 3
- Height = 14
- Alignment = taRightJustify
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object lbExp: TLabel
- Left = 26
- Top = 40
- Width = 3
- Height = 14
- Alignment = taRightJustify
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object OKBtn: TBitBtn
- Left = 168
- Top = 64
- Width = 65
- Height = 25
- Caption = ' &OK'
- Default = True
- ModalResult = 1
- TabOrder = 0
- OnClick = OKBtnClick
- Margin = 2
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object CancelBtn: TBitBtn
- Left = 240
- Top = 64
- Width = 65
- Height = 25
- Cancel = True
- Caption = ' &Cancel'
- ModalResult = 2
- TabOrder = 1
- Margin = 2
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object HelpBtn: TBitBtn
- Left = 312
- Top = 64
- Width = 65
- Height = 25
- HelpContext = 3
- Caption = ' &Help'
- TabOrder = 2
- OnClick = HelpBtnClick
- Margin = 2
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object Edit1: TEdit
- Left = 92
- Top = 36
- Width = 441
- Height = 22
- TabOrder = 3
- end
- object Edit2: TEdit
- Left = 92
- Top = 4
- Width = 441
- Height = 22
- Enabled = False
- TabOrder = 4
- end
- object cbEval: TCheckBox
- Left = 4
- Top = 68
- Width = 129
- Height = 17
- Caption = 'Evaluate after settings'
- State = cbChecked
- TabOrder = 5
- end
- end
-