Witam.
Odkąd zrobiłem podgląd wydruku w moim programie, nie działa on poprawnie. Wszelkie próby nie przynosiły efektu, więc zwracam się tutaj o pomoc. Przygotowałem testową formę z jedynym elementem TImage
. Przedstawiam mój kod i jego efekty
Jeżeli użyję Image1.Canvas.Draw(0,0,B)
i TImage1.Stretch:=true
, efekt jest taki sam jak na pierwszym obrazku.
Gdzie mam błąd? Jak powinienem to wykonać, aby obrazek był powiększany na całe okno, a nie robiła się "lupa"?
Proszę o pomoc.