Ändere mal diese Zeile:
Delphi-Quellcode:
procedure TNeuerKundeForm.FormCanResize(Sender: TObject; var NewWidth, NewHeight: Integer; var Resize: Boolean);
begin
//NeuerKundeForm.Height := Hauptform.ClientHeight; // Das geht schief
resize := false;
end;
Du kannst doch die Werte für NewWidth und NewHeight benutzen und resize muss dann auch true sein.
Code:
NeuerKundeForm.Height := NewHeight;
resize := false;
Wenn ich resize auf true setze, kann man noch die Größe ändern.
Auch wenn ich einen anderen BorderStyle benutze und resize := true setze, ist es weiterhin nicht editierbar.
Hab's mal in den Anhang geladen.