Einzelnen Beitrag anzeigen

Peter60

Registriert seit: 17. Mär 2005
Ort: Im schönen Allgäu
66 Beiträge
 
Delphi 11 Alexandria
 
#7

Re: Delphi 2009 Umstellung Drucker Steuercodes gehen nicht m

  Alt 28. Jul 2009, 20:05
Nur falls noch jemand das gleiche Problem hatte hier die Lösung!

Delphi-Quellcode:
Belegtext.Clear; // TRichEdit
Belegtext.Lines.Append(#27+#64); // Drucker initialisieren
Belegtext.Lines.Append(#27+#77+#48);
Belegtext.Lines.Append(#27+#82+#2); // Deutscher Zeichensatz //
Belegtext.Lines.Append('ÄÖÜßäöüß');
Belegtext.Lines.Append('Bla Bla');
Anstatt diese Zeile

DruckeRoh_String(Belegtext.Text, Drucker); diese Zeile
Delphi-Quellcode:

DruckeRoh_String(UTF8String(Belegtext.Text), Drucker);
dann funktionieren auch die Steuerzeichen beim Drucker


Trotzdem Danke für eure Hilfe

Peter60

[edit=mkinzler]Delphi-Tags eingefügt Mfg, mkinzler[/edit]
  Mit Zitat antworten Zitat