Witam.
Nie wiem jak zrobić!
Tworzę wydruk a przed podjęciem decyzji o wydruku pokazuję go na ekranie.
Nie mam pojęcia jak to zrobić by jedną i tą samą procedurą tworzyć Image1.Canvas
a potem drukować Printer.Canvas. Obecnie dubluję procedury.
Pozdrawiam.
Może użyj TCanvas.CopyRect()?
Druk idzie na drukarkę w której printer.Canvas.Handle,LOGPIXELSX jest 1200 lub 2400 i w ort! sposób nie można stworzyć ( po 98 Image1.Canvas ) tak dużego Canvas a przy kopiowanie ze skalowaniem tracę jakość.
Więc pozostaje jedynie znalezienie jakiegoś lepszego sposobu na skalowanie.
Tylu cztających i żadnej podpowiedzi. Genialnie.
//jasiu nie marudź. pq
Próbowałeś na metafilu oprzeć? nie traci jakości przy skalowaniu... a do pokazywania wyrduku i drukowania możesz użyć TPrintPreview z DelphiArea.com [http://www.delphiarea.com/]