object TestStringDlg: TTestStringDlg Left = 230 Top = 149 ActiveControl = OKBtn BorderStyle = bsDialog Caption = 'Font Show Test String' ClientHeight = 214 ClientWidth = 317 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 300 Height = 161 Shape = bsFrame IsControl = True end object Label1: TLabel Left = 88 Top = 100 Width = 125 Height = 16 Alignment = taCenter Caption = 'Enter Test Phrase' Font.Color = clBlack Font.Height = -15 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object OKBtn: TBitBtn Left = 64 Top = 180 Width = 77 Height = 27 TabOrder = 1 OnClick = OKBtnClick Kind = bkOK Margin = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 148 Top = 180 Width = 77 Height = 27 TabOrder = 2 OnClick = CancelBtnClick Kind = bkCancel Margin = 2 Spacing = -1 IsControl = True end object Edit1: TEdit Left = 32 Top = 48 Width = 257 Height = 24 Font.Color = clBlack Font.Height = -15 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] MaxLength = 255 ParentFont = False TabOrder = 0 end end