Registriert seit: 1. Jun 2005
70 Beiträge
|
Re: treeview auf mdiform
13. Jul 2005, 18:18
Hi
ganz einfach:
Borderless MDI Form
To create an MDI Form without a border, you need to override the CreateParams() method and modify the style and exStyle bytes there.
Code:
type
TForm1 = class(TForm)
// ..
procedure CreateParams(var Params: TCreateParams);
override;
end;
implementation
{$R *.DFM}
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
with Params do
begin
Style := Style and WS_BORDER;
exStyle := exStyle and WS_DLGFRAME;
end;
end;
[code]
Wenn die Programme das machen, wie's wir machen, wären sie unbrauchbar...
|