object frmIf: TfrmIf Left = 250 Top = 147 HelpContext = 12 BorderStyle = bsDialog Caption = 'If' ClientHeight = 83 ClientWidth = 512 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 497 Height = 40 Shape = bsFrame IsControl = True end object lblPath: TLabel Left = 16 Top = 21 Width = 6 Height = 13 Caption = 'If' end object lblThen: TLabel Left = 246 Top = 21 Width = 25 Height = 13 Caption = 'Then' end object OKBtn: TBitBtn Left = 256 Top = 54 Width = 77 Height = 25 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 5 NumGlyphs = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 340 Top = 54 Width = 77 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 6 NumGlyphs = 2 Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 424 Top = 54 Width = 77 Height = 25 Caption = 'Help' TabOrder = 7 OnClick = HelpBtnClick NumGlyphs = 2 Spacing = -1 IsControl = True end object edtOperand1: TEdit Left = 32 Top = 18 Width = 81 Height = 21 TabOrder = 0 end object cbxOperator: TComboBox Left = 120 Top = 18 Width = 33 Height = 21 ItemHeight = 13 Items.Strings = ( '==' '!=' '<' '>' '!<' '!>') TabOrder = 1 Text = '==' end object edtOperand2: TEdit Left = 160 Top = 18 Width = 81 Height = 21 TabOrder = 2 end object edtOperationText: TEdit Left = 376 Top = 18 Width = 121 Height = 21 TabOrder = 4 end object cbxOperation: TComboBox Left = 280 Top = 18 Width = 89 Height = 21 ItemHeight = 13 Items.Strings = ( 'goto' 'print' 'error' 'break' 'errorbreak' 'printbreak') TabOrder = 3 Text = 'goto' OnChange = cbxOperationChange end end