Thema: Delphi treeview auf mdiform

Einzelnen Beitrag anzeigen

jaikai

Registriert seit: 1. Jun 2005
70 Beiträge
 
#4

Re: treeview auf mdiform

  Alt 13. Jul 2005, 17: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...
  Mit Zitat antworten Zitat