TShape an Größe von TForm oder TImage anpassen

[merlin2004]

Ich hab das jetzt mit der Funktion Findcomponent hinbekommen.
Aber jetzt hab ich noch folgendes Problem:

Meine selber gezeichneten Shapes werden jetzt zwar bei der Größenänderung mit verschoben, aber die Position passt nicht mehr zu der darunter liegenden Grafik.
Die Grafik wurde mit dem Parameter "stretch = true" in TImage geladen.
Das scheint jetzt ein Problem mit der Auflösung bzw. dem Verkleinerungs- oder Vergrößerungsverhältnis der Gafik zu sein.

Ich hab in der Grafik 2 Kreuze. Auf diese positioniere ich jeweils ein Shape.

Wenn ich jetzt das Fenster verkleinere oder vergrößere, dann verschiebt es meine Shapes aber die Kreuze "wandern" viel langsamer mit Das heisst die Shapes sind irgendwann nicht mehr über den Kreuzen. Dort sollten Sie aber bleiben.

Hat jemand eine Idee wie man das berechnen kann?
Im Endeffekt dürfte ja der Wert für [Shape].left immer geringfügiger kleiner werden je mehr sich die Breite des Bildes veringert.
*Das ist wieder ein deutsch heute *

Aber [Shape].left um weniger als ein Pixel versetzen geht ja nicht.
Ausser ich setz die Position nur jedes xte Mal


Mittlerweile bin ich mir auch gar nicht mehr so sicher, ob das mit dem Image und den Shapes der richtige Weg ist.


Gruß Merlin