Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi TForm und Ereigniss OnResize (https://www.delphipraxis.net/79266-tform-und-ereigniss-onresize.html)

Darkchild 19. Okt 2006 11:10


TForm und Ereigniss OnResize
 
Hallo zusammen,

ich habe da ein Problem welches ich im Augenblick nicht gelöst bekomme, aber wahrscheinlich sehe ich den Wald vor lauter Bäumen nicht mehr, also folgendes :

Ich habe eine TForm auf der ich in der oberen rechten Ecke ein TImage plaziert habe in dem ein Picture angezeigt wird.
Die TForm ist bei aufruf nicht auf Bildschirmgrösse sondern ein stück kleiner, wenn ich jetzt auf den Button Maximieren klicke vergrössert sich die Form auf komplette höhe und breite und das Bild welches im Image liegt bleibt an seinem Ursprungsort, soll es aber nicht, es soll mit in die obere rechte Ecke wandern.
Deshalb habe ich mir das OnResize Ereigniss genommen und folgenden Code hinterlegt (jetzt wohl nur stark gekürzt):

Delphi-Quellcode:
 imgmitaransi.left := 638;
Wenn ich die Anwendung jetzt starte und ich die Form maximiere liegt mein Image so wie es sein soll in der oberen rechten Ecke, wenn ich jetzt aber das Fenster(die Form) wieder mit minimieren bestätige bleibt die Position des Images ,so wie vorher im Delphi Code gezeigt, und ich kann es nicht mehr komplett sehen.
Aus diesem Grunde habe ich eine Abfrage erstellt und mir eine Schaltervariable erzeugt die jenachdem den Wert 0 oder 1 bekommt, damit ich beim vorgang des minimierens die Left - Eigenschaft wieder auf ihren Ursprünglichen Wert setzten kann und ich in Minimierter Ansicht mein Bild wieder da habe wo es hin soll, aber das klappt vorn und hinten nicht, es sceint als würde beim minimieren das Ereigniss OnResize garnicht mehr betreten werden.

Also meine Frage jetzt : Was muss ich machen damit mein Image immer die passende grösse an die Eigenschaft left übergibt, bei dem Ereigniss des vergrösserns und verkleinerns der Form ?

Hoffe ihr habt verstanden worum es mir geht, fällt mir ein wenig schwer den Vorgang zu beschreiben !

Gruss
Darkchild

mkinzler 19. Okt 2006 11:12

Re: TForm und Ereigniss OnResize
 
Schon mit .Align und .Constraints herumexperimentiert?

ste_ett 19. Okt 2006 11:14

Re: TForm und Ereigniss OnResize
 
Einfach im OI property "Anchors" für mkLeft und mkBottom auf False und mkRight und mkTop auf True. :)
Dann musst du nichts mit onResize machen.

Darkchild 19. Okt 2006 11:31

Re: TForm und Ereigniss OnResize
 
Danke ihr zwei.

@ste_ett
hattest recht mit den Anchors hig es zusammen.
Hatte vorher auch mit Align und Constrains probiert, hatte aber alles den falschen Effekt.
Dann war ich schon an den Anchors, hatte aber auch nicht geklappt und dank Dir weis ich was ich dort vergessen habe, hatte nämlich Anchor Left immer noch auf True und deswegen ging es nicht.
Jetzt funzt es, ich glaub ich hätte mich jetzt doof gesucht, aber wie sagt mein Chef immer so schön "Immer einfach denken".
Hatte ich das gamacht dann hätte ich jetzt nicht 2 Stunden wegen diesem blöden Bild vergeudet.

Also nochmals "DANKE" :thumb:

Gruss
Darkchild


Alle Zeitangaben in WEZ +1. Es ist jetzt 04:33 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz