Problem beim drucken mit #10

[ferby]

Hallo,

Ich habe eine variabel:
druckspeicher:string; .
.
.
druckspeicher:='ein test' +#10#10+ 'nächste zeile'; wenn ich jetzt drucke:

Delphi-Quellcode:

         with Printer do
            begin
              BeginDoc;
              Canvas.Font.name := 'Arial';
              Canvas.Font.Size:= 8;
              Canvas.TextOut(10,10,druckerspeicher);
              Canvas.Brush.Color := clBlack;
              EndDoc;
            end;

dann wird alles in eine Zeile geschrieben und statt eines zeilenumbruch kommt ein kasterl, was mach ich falsch?

[SirThornberry]

du darfst nicht #10#10 nehmen sondern #13#10. Wenn du im Forum suchst wirst du herausfinden das, eines einen wagenrücklaufzeichen ist und das andere der Zeilenumbruch - Also das eine Zeichen bedeutet "eine Zeile weiter runter" und das andere "Zum zeilenanfang". Desweiteren spielt es eine rolle mit welcher funktion du den text auf die Canvas ausgibst. Ich glaub mit Canvas.Textout geht das nicht, du solltest lieber "DrawText" verwenden. Eventuell reicht dort schon #10. Du kannst das ganze ja mit einer normalen Canvas (z.B.: Form1.Canvas) probieren um Papier bei den Versuchen zu spaaren

[ferby]

Hi,

habs mit #13+#10 versucht, passiert das selbe....
wie meinst du das mit drawtext, kannst du mir da ein beispiel nennen?

[ferby]

Hallo,

kann mir wer erklären wie ich drawtext mit einen Drucker verwende? Ein kleines Beispiel?

Danke,
Ferby

[SirThornberry]

schau dir einfach mal die Hilfe dazu an. Wenn du die Suche benutzt findest du auch genug beispiele dazu (einfach nur DrawText in der Hilfe eingeben )