[Lazarus] Form always 400 x 300 initially

[Bart]

You mean that this does not work?

TMyForm = class(TCustomForm)
public
  constructor Create(AOwner: TComponent); override;
end;

consructor TMyForm.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  Width := 640;
  Height := 480;
end;

Bart