Drukowanie - Skalowanie

Dlaczego jak daje:
[code]
Printer.begindoc;
PrintScale:= TPrintScale(poproportional);
printer.canvac.......itd;
Printer.Enddoc;
[/code]
to mi sie nie drukuje o takich rozmiarach jak jest na formie.
Próbowałem też:
PrintToFit
i też nie działa. jak sie skaluje, żeby sie drukowało coś o takich rozmiarach jak na formie?

Przecież ta "wielkosc" formy zależy do wielkości monitora, rozdzielczości itp. Komupter nie ma rąk żeby samemu zmieżyć przekątną ekranu linijką...