Guten Tag,<BR>
Bei einem Report wird mit<BR>
FCanvas := TMetafileCanvas.Create(FMetafile, ReferenceDevice);<BR>
eine Zeichenfläche erzeugt. <BR>
im Normalfall ist ReferenceDevice 0 <BR>
Das ganze funktioniert auf normalen Rechnern ohne Probleme<BR>
<BR>
Wenn im Rechner eine Multimonitor-Grafikkarte steckt, <BR>
tauchen Probleme beim drucken von Schriften auf:<BR>
Bei allen Zeichen ist der Zeichenabstand um ca. die Hälfte verringert.<BR>
Andere Dimensionen stimmen jedoch<BR>
<BR>
Meine Versuchen, ReferenceDevice zu ersetzen sind leider<BR> gescheitert :<BR>
<BR>
H := GetDesktopWindow;
ReferenceDevice := GetDC(H);
<BR>
H := Screen.monitors[0].Handle;
ReferenceDevice := GetDC(H);
<BR>
Weiß jemand Rat ?<BR>
<BR>
Mfg sigbert<BR>
Bei einem Report wird mit<BR>
FCanvas := TMetafileCanvas.Create(FMetafile, ReferenceDevice);<BR>
eine Zeichenfläche erzeugt. <BR>
im Normalfall ist ReferenceDevice 0 <BR>
Das ganze funktioniert auf normalen Rechnern ohne Probleme<BR>
<BR>
Wenn im Rechner eine Multimonitor-Grafikkarte steckt, <BR>
tauchen Probleme beim drucken von Schriften auf:<BR>
Bei allen Zeichen ist der Zeichenabstand um ca. die Hälfte verringert.<BR>
Andere Dimensionen stimmen jedoch<BR>
<BR>
Meine Versuchen, ReferenceDevice zu ersetzen sind leider<BR> gescheitert :<BR>
<BR>
H := GetDesktopWindow;
ReferenceDevice := GetDC(H);
<BR>
H := Screen.monitors[0].Handle;
ReferenceDevice := GetDC(H);
<BR>
Weiß jemand Rat ?<BR>
<BR>
Mfg sigbert<BR>
Comment