Thema: TImage Zoom

Einzelnen Beitrag anzeigen

Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.542 Beiträge
 
Delphi 11 Alexandria
 
#42

AW: TImage Zoom

  Alt 20. Sep 2012, 14:59
So, hier noch ein paar Gedanken dazu:
- wir benötigen die Abmessungen des Buttons relativ zur im Image enthaltenen Grafik
- die Koordinaten des Buttons sind aber relativ zu seinem Parent (Formular, Panel, Tabsheet oder wo er auch draufliegt)
- je nach Einstellungen des TImage muss seine Breite/Höhe nicht der der Grafik entsprechen
- daraus folgt, dass wir mit einem Offset für X- und Y-Achse rechnen müssen, nämlich dem "Anzeigeabstand" zwischen Rand des Image und der Grafik
- da ich auf die Schnelle keine Eigenschaft finden konnte, um das Anzeigerechteck der Grafik innerhalb des Image zu ermitteln, sind diese Überlegungen ggf. schon wieder hinfällig

Alternative:
- man setzt Autosize des Image auf true und verändert die enthaltene Grafik in der Größe
- damit das auch nach ein paar Änderungen noch einigermaßen aussieht, sollte man das Original im Speicher halten, bei Änderungen eine gestretchte Kopie erzeugen und dem Image zuweisen
- da die linke obere Ecke fix bleiben soll, entfallen die o.a. Offset-Berechnungen
- der Rest ist Prozentrechnung

Alle Klarheiten beseitigt?
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat