object PrintMapDialog: TPrintMapDialog Left = 248 Top = 141 BorderStyle = bsDialog Caption = 'Ausdruck der Karte' ClientHeight = 368 ClientWidth = 593 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 96 OnCreate = FormCreate TextHeight = 13 object GroupBox1: TGroupBox Left = 304 Top = 8 Width = 281 Height = 321 Caption = 'Texte und Schriftarten' TabOrder = 0 object TitleFontLabel: TLabel Left = 24 Top = 64 Width = 3 Height = 13 end object HeaderFontLabel: TLabel Left = 24 Top = 176 Width = 3 Height = 13 end object FooterFontLabel: TLabel Left = 24 Top = 288 Width = 3 Height = 13 end object TitleEdit: TEdit Left = 24 Top = 32 Width = 249 Height = 21 TabOrder = 0 Text = 'Titel (einzeilig)' OnExit = TitleEditExit end object TitleCheckBox: TCheckBox Left = 8 Top = 16 Width = 97 Height = 17 Caption = 'Titel anzeigen' State = cbChecked TabOrder = 1 OnClick = TitleCheckBoxClick end object TitleFontButton: TButton Left = 200 Top = 62 Width = 75 Height = 25 Caption = 'Schriftart ...' TabOrder = 2 OnClick = TitleFontButtonClick end object HeaderCheckBox: TCheckBox Left = 8 Top = 88 Width = 113 Height = 17 Caption = 'Kopfzeile anzeigen' State = cbChecked TabOrder = 3 OnClick = HeaderCheckBoxClick end object HeaderFontButton: TButton Left = 200 Top = 174 Width = 75 Height = 25 Caption = 'Schriftart ...' TabOrder = 4 OnClick = HeaderFontButtonClick end object FooterCheckBox: TCheckBox Left = 8 Top = 200 Width = 129 Height = 17 Caption = 'Fu�zeile anzeigen' State = cbChecked TabOrder = 5 OnClick = FooterCheckBoxClick end object FooterFontButton: TButton Left = 200 Top = 286 Width = 75 Height = 25 Caption = 'Schriftart ...' TabOrder = 6 OnClick = FooterFontButtonClick end object HeaderMemo: TMemo Left = 24 Top = 104 Width = 249 Height = 65 Lines.Strings = ( 'Kopfzeile (mehrzeilig)') TabOrder = 7 OnExit = TitleEditExit end object FooterMemo: TMemo Left = 24 Top = 216 Width = 249 Height = 65 Lines.Strings = ( 'Fu�zeile (mehrzeilig)') TabOrder = 8 OnExit = TitleEditExit end end object GroupBox2: TGroupBox Left = 8 Top = 8 Width = 289 Height = 321 Caption = 'Rand um den Kartenausschnitt in Millimetern' TabOrder = 1 object Image1: TImage Left = 56 Top = 48 Width = 180 Height = 243 AutoSize = True Picture.Data = {} end object LeftEdit: TEdit Left = 8 Top = 152 Width = 41 Height = 21 TabOrder = 0 OnExit = LeftEditExit end object TopEdit: TEdit Left = 120 Top = 24 Width = 41 Height = 21 TabOrder = 1 OnExit = TopEditExit end object RightEdit: TEdit Left = 236 Top = 152 Width = 41 Height = 21 TabOrder = 2 OnExit = RightEditExit end object BottomEdit: TEdit Left = 120 Top = 288 Width = 41 Height = 21 TabOrder = 3 OnExit = BottomEditExit end object Button1: TButton Left = 8 Top = 16 Width = 89 Height = 25 Caption = 'Seite ausnutzen' TabOrder = 4 OnClick = Button1Click end end object OKButton: TButton Left = 432 Top = 336 Width = 75 Height = 25 Caption = 'OK' ModalResult = 1 TabOrder = 2 OnClick = OKButtonClick end object CancelButton: TButton Left = 512 Top = 336 Width = 75 Height = 25 Caption = 'Abbrechen' ModalResult = 2 TabOrder = 3 end object TitleFontDialog: TFontDialog Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Left = 312 Top = 336 end object HeaderFontDialog: TFontDialog Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Left = 352 Top = 336 end object FooterFontDialog: TFontDialog Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Left = 392 Top = 336 end object PrinterSetupDialog1: TPrinterSetupDialog Left = 272 Top = 336 end end