Einzelnen Beitrag anzeigen

Benutzerbild von APP
APP

Registriert seit: 24. Feb 2003
Ort: Graz (A)
705 Beiträge
 
Delphi 7 Enterprise
 
#3

Re: TMemo + OEM_CHARSET ist beim Drucken unpräzise

  Alt 29. Sep 2006, 07:17
Guten Morgen marabu,

danke für Deinen Tip,
ich habe das inzwischen auch schon gemacht, leider ohne erfolg

Ich habe mal die Klötzchengrafik aus meinem Memo kopiert

SQL-Code:
Netzwerk 1 Pumpe P7 oder P16 Hand ein
                       ÚÄÄÄ¿
           ÄE68.0 ÄÄp´ & ³
           ÄE36.7 ÄÄp´ ³
           ÄE70.2 ÄÄp´ ³
             ÚÄÄÄ¿ ³ ³
 ÄE109.3 ÄÄp´>=1³ ³ ³ ÚÄÄÄÄÄÄ¿
 ÄE10.1 ÄÄp´ ³ÄÄÄÄij ³ÄĿij = ³ ÄM177.4
             +ÄÄÄ+ +ÄÄÄ+ +ÄÄÄÄÄÄ+

E 68.0 = E68.0 M10.094 Pumpe P7 BEFEHL EIN +3P40ÄA3.0
E 36.7 = E36.7 RM.PRpDUKTVENTIL PRpD.7/16 ZU 253.2 S13
E 70.2 = E70.2 M10.095 Pumpe P16 BEFEHL EIN +3P40ÄK16
E 109.3 = E109.3 RM.DpSIERV.PRpD.7/16/17 KADY 1 35.1 S13
E 10.1 = E10.1 RM.DpSIERV.PRpD.7/16/17 KADY 2 35.2 S13
M 177.4 = M177.4 ENTLEERPUMPE PRpD.7/16 HANDBETRIEB 3.1
Wenn im Memo
Delphi-Quellcode:
Font.Charset = OEM_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = 'Terminal
  Font.Pitch = fpFixed
eingestellt ist, wird die Grafik (wie im alten Dos-Stil) korrekt angezeigt, wenn man sie mit Copy&Paste einfügt.
Jeder Versuch diese Grafik auszudrucken, scheitert an der ungenauen Darstellung am Papier.
Armin P. Pressler

BEGIN
...real programmers are using C/C++ - smart developers Delphi;
END;
  Mit Zitat antworten Zitat