Registriert seit: 5. Mär 2013
502 Beiträge
Delphi 7 Enterprise
|
AW: Problem mit Bildschirmauflösung
14. Okt 2014, 13:17
Problem 1 mit der AUflösung habe ich hinbekommen. nunmehr fehlt noch probl. 2
Also auf meinem Laptop erstellt er die pdf dateien mit rolepdf hier ist auch alles gut jedoch auf dem client rechner schiebt er im Briefkopf die Schrift über den rechten rand.
Delphi-Quellcode:
{Briefkopflinie oben}
Font.Size := 6;
Pen.Color := clblack;
MoveTo(100, 220);
LineTo(PageWidth - 100, 220);
Font.Size := 8;
TextOut(120,225,dbmemo1.Lines[0]);
TextOut(270,225,dbmemo1.Lines[1]);
TextOut(420,225,dbmemo1.Lines[2]);//bis hier ist alles Gut
TextOut(660,225,'Vorsitzender:');// ab hier verschiebt er den text nachrechts
TextOut(760,225,form4.ClientDataSet1Vorname.AsString+' '+form4.ClientDataSet1Nachname.asstring);
TextOut(660,240,'Telefon:');
TextOut(760,240,form4.ClientDataSet1Telefonnummer.AsString);
TextOut(660,255,'Email:');
TextOut(760,255,form4.ClientDataSet1email.AsString);
|
|
Zitat
|