Builder - Jak zrobić podgląd wydruku?

0

Jeszcze jedna sprawa.
Chcę zrobić podgląd wydruku. Na drukarkę wysyłam teksty poprzez Canvas->TextOut() i w ten sam sposób chcę zrobić podgląd wysyłając na formę - ten problem mam już z głowy.
Żeby forma odzwierciedlała wielkość kartki papieru A4 to musi mieć wymiary 800 x 1200. Załóżmy że użytkownik używa rozdzielczości 800 x 600 - czyli na szerokość forma się mieści, tylko na wysokość widać jej połowę. Ustawiłem autoscroll formy na true a rodzaj na sizable, wrzuciłem jakiś niewidoczny label na sam dół, żeby pojawił się pionowy scrollbar.
I teraz problem polega na odświeżaniu formy - prze scrollowaniu nie odświeża się canvas formy. Co na to poradzić? Może zastosować komponent ScrollBar, ale pewnie wyjdzie na to samo... (jeśli tak, to w jaki sposób?)
A może zrobić to jakoś zupełnie inaczej? Tylko że z wykorzystaniem canvasa, bo mam masę wydruków porobionych już w ten sposób na drukarkę, więc np. ustawianie labeli na formie i jej druknięcie nie wchodzi w grę.
Dzięki.

0

A probowales umiescic Canvas->TextOut w metodzie OnPaint formularza?
(chyba to sie nazywalo OnPaint... jesli sie myle, to mnie popraw

  • dawno nie pisalem nic w Builderze/Delphi)
0

Tak właśnie mam ale ta funkcja wykonuje się chyba tylko raz przy pokazaniu formularza, w kazdym razie to nie działa.

1 użytkowników online, w tym zalogowanych: 0, gości: 1