In my TCustomForm-based design control, I would like it to have an initial size of my choosing rather than the default 400 wide, 300 high. It appears as though these values are hardwired in the FormEditor1.CreateComponent call in TMainIDE.CreateNewForm, ignoring anything that I set Width or Height to. All other properties that I set in my constructor are honored, just not these.

Any workaround for this?

Thanks.

-Phil

I'm guessing then that setting the width and height OnCreate won't work because that's where they're overridden; a very messy solution would be to set a TTimer to 5ms or so and then change the width.

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus/attachments/20091217/814d2ac8/attachment-0001.html>

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

Correct, does not work when TMyForm is registered with IDE via FormEditingHook.RegisterDesignerBaseClass.

Thanks.

-Phil

In my TCustomForm-based design control, I would like it to have an initial size of my choosing rather than the default 400 wide, 300 high. It appears as though these values are hardwired in the FormEditor1.CreateComponent call in TMainIDE.CreateNewForm, ignoring anything that I set Width or Height to. All other properties that I set in my constructor are honored, just not these. Any workaround for this?

The IDE now uses the default width/height.

Mattias

Many thanks. Now works fine.

-Phil