Einzelnen Beitrag anzeigen

ThoPos

Registriert seit: 30. Jun 2004
Ort: Köln
69 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#8

Re: Seitenverhältnisse von Formularen beim Resize belassen

  Alt 15. Nov 2007, 19:38
Hallo BitSetter,

leider kennt meine Form2 diesen Satz aus der Hilfe nicht oder hält sich zumindestens nicht daran:

Ich habe folgende Procedue in meiner Form2, welche nur zwei Objekte enthält,
ein TPanel und darin ein TImage, beide Align := alClient:

Delphi-Quellcode:
procedure TForm2.FormResize(Sender: TObject);
begin
  Form1.EditWidth.Text := IntToStr(Image.Width);
  Form1.EditHeight.Text := IntToStr(Image.Height);
end;
Während der gesamten Größenänderung werden meine beiden Textfelder in der Form1 permanent aktualisiert und nicht erst am Ende (also wenn ich die Maus nicht mehr bewege bzw. die Maustaste loslasse). Daraus schließe ich, daß die Routine OnResize nicht erst am Ende des Resize aufgerufen wird.

Edit: Dunkel scheint meine Erkenntnis zu bestätigen, oder?

Gruß aus Köln
Thomas
Thomas
  Mit Zitat antworten Zitat