object InputDialog: TInputDialog Left = 244 Top = 129 ActiveControl = EdtInput BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Dialog' ClientHeight = 120 ClientWidth = 478 Font.Color = clBlack Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] PixelsPerInch = 120 Position = poScreenCenter TextHeight = 16 object Bevel1: TBevel Left = 10 Top = 10 Width = 346 Height = 95 Shape = bsFrame IsControl = True end object Prompt: TLabel Left = 24 Top = 27 Width = 50 Height = 16 Caption = 'Prompt' end object OKBtn: TBitBtn Left = 369 Top = 18 Width = 95 Height = 33 TabOrder = 1 Kind = bkOK Margin = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 369 Top = 65 Width = 95 Height = 33 TabOrder = 2 Kind = bkCancel Margin = 2 Spacing = -1 IsControl = True end object EdtInput: TEdit Left = 24 Top = 64 Width = 313 Height = 24 TabOrder = 0 Text = 'EdtInput' end end