Image zoomen

[hitzi]

Kommst du nicht selber auf den Lösungsweg, den hador andeutet?!
Beim Drücken des Buttons fürs Ranzoomen vergrößerst du einfach das Image (TImage.Width und TImage.Top). Funktioniert natürlich nur, wenn Stretch und Proportional des TImages auf True stehen.

Stand im Prinzip alles in Hadors Text!

[_frank_]

wobei ich mir vorstellen kann, dass er bei dieser Lösung schnell an Speichergrenzen kommt...

jedoch ist eine Lösung mittels Inflaterect/OffsetRect und StrechBlt und den dazugehörenden Berechnungen ziemlich aufwendig.

mit inflaterect kannst du das sichtbare rechteck auf dem Original berechnen (Proportionen beachten). dieses wird dann auf die Anzeigegröße mittels Stretchblt vergrößert. OffsetRect brauchst du dann für die steuerung der scrollbars (um den schtbereich zu verschieben).

soviel zur Theorie

Gruß Frank

[Davidlocke13]

Hat sich erledigt