TForm darf nicht kleiner als eine bestimmte Größe werden....

[Kedariodakon]

Dieses Problem hab ich ATM...
Auch schon gelöst, aber unfein...


Meine Jetzige Lösung:

Delphi-Quellcode:

procedure TTFormMain.FormResize(Sender: TObject);
begin
  IF TFormMain.ClientWidth < 778 then TFormMain.ClientWidth := 778;
  IF TFormMain.ClientHeight < 656 then TFormMain.ClientHeight := 656;
end;

Das Problem was ich damit habe, wenn ich es kleiner werden lasse, als es darf flakert das Bild so komisch...
Kann ich das irgendwie anhalten, dass das dann sich nicht weiterschieben läßt??


MFG Keda

[fkerber]

Hi!

Form1.Constraints.MinWidth:=778; Hoffe, das hilft.


Ciao Frederic

[Nightshade]

Guck mal im OI unter :

Constraints

[Kedariodakon]

danke funktioniert perfekt ^^

MFG Keda