Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
 
Delphi 12 Athens
 
#15

AW: Main.Width und Height

  Alt 5. Sep 2020, 21:01
Wenn einwas auch nur ein Pixel zu klein ist, beim Ziehen, dann wird alles garnicht geändert,
außerdem springt es beim Ziehen in größeren Achritten, es sei denn du ziehst du Maus extrem langsam, womit es garnicht so leicht ist genau an diese Grenze ran zu kommen.

Ist dir an den Parametern was aufgefallen? (VAR)
Delphi-Quellcode:
procedure TMainForm.FormCanResize(Sender: TObject; var NewWidth, NewHeight: Integer; var Resize: Boolean);
begin
  if NewHeight < 374 then NewHeight := 374;
  if NewWidth < 636 then NewWidth := 636;
end;

// bzw.
NewHeight := Max(NewHeight, 374);
NewWidth := Max(NewWidth, 636);
Aber wozu das Manuelle, wenn es auch automatisch geht?
Form.Contraints.MinHeight und MinWidth
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu ( 5. Sep 2020 um 21:08 Uhr)
  Mit Zitat antworten Zitat