object frmQuery: TfrmQuery Left = 218 Top = 440 Hint = '|Question' HorzScrollBar.Visible = False VertScrollBar.Visible = False ActiveControl = edUserInput BorderIcons = [biSystemMenu] AutoScroll = False Caption = 'Input' ClientHeight = 81 ClientWidth = 321 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop Icon.Data = {} Position = poScreenCenter Scaled = False OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 201 Height = 65 end object lbledUserInput: TEnhLabel Left = 16 Top = 19 Width = 45 Height = 13 Caption = '&Question:' FocusControl = edUserInput WordWrap = True end object BBOk: TBitBtn Left = 228 Top = 20 Width = 81 Height = 25 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 0 OnClick = BBOkClick NumGlyphs = 2 end object BBCancel: TBitBtn Left = 228 Top = 49 Width = 81 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 1 NumGlyphs = 2 end object edUserInput: TLblEdit Left = 16 Top = 36 Width = 185 Height = 21 TabOrder = 2 OnKeyPress = edUserInputKeyPress OverwriteMode = False UndoWhenEsc = False WordWrap = False LabelPos = lpTop LabelMargin = 4 LabelComponent = lbledUserInput LabelRelLeft = 0 LabelRelTop = -17 end end