Umlaute drucken

**150gozilla**

Hallo, ich hab mir ein Azubi Programm geschrieben.

Wenn ich drucke werden die (ä,ü,ö) in blöcke geändert.. ich denke mal der Zeichensatz stimmt nicht.. oder soll ich sie per ascii ausgeben lassen ?

So siehts im Moment aus: TextAusgabe (15+17,31.5, 'Ausgeführte Arbeiten, Unterricht');

**fkerber**

Hi!

Wie sieht denn die Procedure textausgabe aus?

Ciao Frederic

**150gozilla**

markieren

Delphi-Quellcode:

			   procedure Textausgabe(x,y:Double; GibText:String);

   begin

     printer.canvas.textout(getx(x)+getdevicecaps(Printer.Canvas.Handle, PHYSICALOFFSETX),

                            gety(y)+getdevicecaps(Printer.Canvas.Handle, PHYSICALOFFSETY),GibText);

   end;

Hoffe du kannst was damit anfangen

**150gozilla**

Könnte mir bitte jemand helfen ?

**SirThornberry**

Bitte unterlasse das pushen innerhalb von 24 stunden. Es ist unfähr gegenüber anderen, welche auch ein Problem haben, wenn du auf diese Weise deinen Beitrag immer nach ganz oben bringst.

**andreash**

Welchen Font verwendest du?

**150gozilla**

Öhm den standard Font. Ich hab lediglich die Schrift mit bold verdickt.

font.style := [fsbold];

**andreash**

Interessant ist auch die Eigenschaft TFont.Charset. Setzte diese mal auf ANSI_CHARSET. Falls das auch nicht funktioniert, probiere
Font.Name='Arial'; aus.

Umlaute drucken

Umlaute drucken

Re: Umlaute drucken

Re: Umlaute drucken

Re: Umlaute drucken

Re: Umlaute drucken

Re: Umlaute drucken

Re: Umlaute drucken

Re: Umlaute drucken

Forumregeln

150gozilla Registriert seit: 1. Sep 2005 Ort: Taunusstein 116 Beiträge Delphi 5 Professional	#1 Umlaute drucken 23. Jun 2006, 13:23 Hallo, ich hab mir ein Azubi Programm geschrieben. Wenn ich drucke werden die (ä,ü,ö) in blöcke geändert.. ich denke mal der Zeichensatz stimmt nicht.. oder soll ich sie per ascii ausgeben lassen ? So siehts im Moment aus: TextAusgabe (15+17,31.5, 'Ausgeführte Arbeiten, Unterricht'); Chris
	Zitat

fkerber (CodeLib-Manager) Registriert seit: 9. Jul 2003 Ort: Ensdorf 6.723 Beiträge Delphi XE Professional	#2 Re: Umlaute drucken 23. Jun 2006, 13:24 Hi! Wie sieht denn die Procedure textausgabe aus? Ciao Frederic Frederic Kerber
	Zitat

150gozilla Registriert seit: 1. Sep 2005 Ort: Taunusstein 116 Beiträge Delphi 5 Professional	#3 Re: Umlaute drucken 23. Jun 2006, 13:30 markieren Delphi-Quellcode: procedure Textausgabe(x,y:Double; GibText:String); begin printer.canvas.textout(getx(x)+getdevicecaps(Printer.Canvas.Handle, PHYSICALOFFSETX), gety(y)+getdevicecaps(Printer.Canvas.Handle, PHYSICALOFFSETY),GibText); end; Hoffe du kannst was damit anfangen Chris
	Zitat

150gozilla Registriert seit: 1. Sep 2005 Ort: Taunusstein 116 Beiträge Delphi 5 Professional	#4 Re: Umlaute drucken 23. Jun 2006, 14:45 Könnte mir bitte jemand helfen ? Chris
	Zitat

SirThornberry (Moderator) Registriert seit: 23. Sep 2003 Ort: Bockwen 12.235 Beiträge Delphi 2006 Professional	#5 Re: Umlaute drucken 23. Jun 2006, 15:17 Bitte unterlasse das pushen innerhalb von 24 stunden. Es ist unfähr gegenüber anderen, welche auch ein Problem haben, wenn du auf diese Weise deinen Beitrag immer nach ganz oben bringst. Jens Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
	Zitat

andreash Registriert seit: 22. Jun 2006 Ort: Dörverden 60 Beiträge Delphi 7 Professional	#6 Re: Umlaute drucken 25. Jun 2006, 22:10 Welchen Font verwendest du? Andreas Der Optimist glaubt, wir leben in der besten aller möglichen Welten. Der Pessimist befürchtet, daß das stimmt.
	Zitat

150gozilla Registriert seit: 1. Sep 2005 Ort: Taunusstein 116 Beiträge Delphi 5 Professional	#7 Re: Umlaute drucken 27. Jun 2006, 10:12 Öhm den standard Font. Ich hab lediglich die Schrift mit bold verdickt. font.style := [fsbold]; Chris
	Zitat

andreash Registriert seit: 22. Jun 2006 Ort: Dörverden 60 Beiträge Delphi 7 Professional	#8 Re: Umlaute drucken 27. Jun 2006, 20:19 Interessant ist auch die Eigenschaft TFont.Charset. Setzte diese mal auf ANSI_CHARSET. Falls das auch nicht funktioniert, probiere Font.Name='Arial'; aus. Andreas Der Optimist glaubt, wir leben in der besten aller möglichen Welten. Der Pessimist befürchtet, daß das stimmt.
	Zitat