TImage verankern

[tripleeye]

Hallo,
ich hab mit der image-komponete ein kleines problem: ich hab eine Form als MDIParent und hier soll unten rechts ein image angezeigt werden.

ich hab es mit den anchor-properties im oblektinspektor probiert, aber sobald ich das fenster verkleinere, verschwindet das bild. wenn ich das fenster maximiere ist das bild zweimal da und wenn ich es nur etwas größer mache, entsteht ein effekt, der zwar lustig anzuschauen ist, aber das war nicht der sinn des ganzen.

meine erste idee war beim resize-event der form das bild zu positionieren (relativ über clientheight-clientwidth), aber das hat nix gebracht.

im selben ereignis hab ich dann probiert ein repaint des images durchzuführen, dass hatt aber keinerlei auswirkungen.

würd mich freuen wenn jemand ne gute idee hat.

[marabu]

Zitat von tripleeye:

meine erste idee war beim resize-event der form das bild zu positionieren (relativ über clientheight-clientwidth), aber das hat nix gebracht.

Ist aber genau der richtige Ansatz. Funktioniert bei mir einwandfrei.

Delphi-Quellcode:

procedure TForm.FormResize(Sender: TObject);
begin
  Image.Top := ClientHeight - Image.Height;
  Image.Left := ClientWidth - Image.Width;
end;

Grüße vom marabu

[Muetze1]

Moin!

Wie wärs denn einfach ohne Code? Image unten rechts in die Ecke ziehen wo es sein sollte und dann im Objektinspektor bei Anchors folgendes setzen: Top = False, Left = False, Right = True, Bottom = True

MfG
Muetze1

[tripleeye]

@ marabu : war nicht nur ein ansatz von mir, genau das hab ich auch umgesetzt, sicherlich ist die image-komponente genau da gewesen, wo sie sein sollte, nur hat die bitmap darin mist gebaut (wurde nicht angezeigt, war in streifen zu sehen).

@ Muetze1: auch das hab ich probiert, mit dem oben beschriebenen erfolg

[marabu]

Klar, dass in beiden Fällen das gleiche Ergebnis kommt, passiert intern ja das gleiche.

Ich hatte übrigens mit den Borland Splash Images getestet - 256 color chemical.bmp - ganz ohne Streifen.

marabu