object Zeile: TZeile Left = 210 Top = 129 ActiveControl = Memo1 BorderStyle = bsDialog Caption = 'Mehrzeilige Texte' ClientHeight = 157 ClientWidth = 360 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 265 Height = 145 Shape = bsFrame IsControl = True end object Label1: TLabel Left = 16 Top = 13 Width = 89 Height = 13 Caption = 'Eintragungstext' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object einjahr: TLabel Left = 292 Top = 129 Width = 52 Height = 22 AutoSize = False Caption = '1996' Font.Color = clBlack Font.Height = -21 Font.Name = 'Times New Roman' Font.Style = [] ParentFont = False end object OKBtn: TBitBtn Left = 276 Top = 8 Width = 77 Height = 27 Caption = '&OK' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = OKBtnClick Kind = bkOK Margin = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 276 Top = 40 Width = 77 Height = 27 Caption = '&Abbruch' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = CancelBtnClick Kind = bkCancel Margin = 2 Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 276 Top = 72 Width = 77 Height = 27 Caption = '&L�schen' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = HelpBtnClick Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550 305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000 005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0 B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0 B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000 B0557777FF577777F7F500000E055550805577777F7555575755500000555555 05555777775555557F55550005555555055555777555555575550000} Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object Memo1: TMemo Left = 16 Top = 32 Width = 249 Height = 113 Lines.Strings = ( '') TabOrder = 1 end object CB: TCheckBox Left = 278 Top = 112 Width = 97 Height = 17 Caption = 'Ein&malig' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = CBClick end end