oj. jakoś nie dostałem powiadomienia, że ktoś tutaj coś napisał

ludas pisze:prokopcio mam do Ciebie pytanie:
Jak rozwiązałeś skolowanie obrazka ? (Chodzi o to że, gdy obrazek ma dużą rozdzielczość to nie mieści się na ekrenie) Czy twój obrazek ma zawsze oryginalne wymiary (1piksel = 1krok) czy może wymyśliłeś coś, żeby można było zmniejszyć rysunek (w podglądzie)?

skalowanie:

AktualnaWspX := ( AktualnyKrokX / MaxIlośćKrokówX ) * SzerokośćObrazka
AktualnaWspY := ( AktualnyKrokY / MaxIlośćKrokówY ) * WysokośćObrazka

Żeby obrazek zachował proporcje to stosujesz:
AktualnaWspX := ( AktualnyKrokX / MaxIlośćKrokówY ) * SzerokośćObrazka
AktualnaWspY := ( AktualnyKrokY / MaxIlośćKrokówY ) * WysokośćObrazka
jeśli MaxIlośćKrokówX < MaxIlośćKrokówY

lub
AktualnaWspX := ( AktualnyKrokX / MaxIlośćKrokówX ) * SzerokośćObrazka
AktualnaWspY := ( AktualnyKrokY / MaxIlośćKrokówX ) * WysokośćObrazka
jeśli MaxIlośćKrokówX > MaxIlośćKrokówY

dwa powyższe przykłady są dobre jeśli SzerokośćObrazka = WysokośćObrazka, jeśli nie, to trzeba dorzucić więcej warunków...

Opiszcie chłopaki dokładniej z czym problem, ja jak już wspomniałem - napisałem program i wszystko jest ok... Korzystam z TImage.Canvas - w czasie pracy plotera pokazuje na bieżąco... Postaram się pomóc.

Witam - ja napisałem program do obsługi plorera (do cięcia blachy plazmą) korzystającą z formatu HPGL, piszę w delphi, program nie tylko obrazuje plik, ale również symuluje pracę plotera zobacz tutaj:

https://www.cnc.info.pl/viewtopic.php?t=622

Plik hpgl to są gotowe współrzędne i korzystałem (do wyświetlenia) po prostu funkcję MoveTo(x,y) i LineTo(x,y) oczywiście po wyciągnięciu z pliku tekstowego współrzędnych

pozdrawiam