Hallo,
kann mir wer sagen, warum die Seiten unter Windows kleiner ausdrucken
als mit dem Mac?
Und vor allem, wie kann man das vermeiden?
Drucker ist der selbe. Der Mac-Ausdruck passt mit folgendem Code.
Der Windows-Ausdruck ist oben angeschnitten und die Schrift ist ca.
20% kleiner.
g=OpenPrinter()
If g<>nil then
for i=0 to y
if left(seite(i),1)=endofline then
F2.E9.text=Editfield1.text+seite(i)
else
F2.E9.text=Editfield1.text+endofline+seite(i)
end if
stp=F2.KNr.StyledTextPrinter(g,96*7.5)
stp.drawBlock 489,12,96*7.5
stp=F2.E9.StyledTextPrinter(g,96*7.5)
stp.drawBlock 27,18,96*7.5
if i<y then
g.nextPage
end if
next
end if
RB 2006 Pro
Gruß
Robert
