Docked Forms ...

[stoxx]

Wenn man folgenden Quelltext einfügt, sehen die angedockten Forms total unschön aus.
Diese komischen Streifen sind einfach hässlich. Borland hat das besser hinbekommen.

Jetzt weiss ich aber icht, wie man das aussehen verändern könnte ?
Weiss jemand Rat ! ?

Code:

procedure TMainForm.FormCreate(Sender: TObject);
const
  Colors: array[1..6] of TColor =
    (clWhite, clBlack, clBlue, clGreen, clRed, clYellow);
var
  I: Integer;
begin


  for I := Low(Colors) to High(Colors) do
    with TForm.CreateNew(Self) do
    begin
      Caption := 'Dock me in the main form';
      Color := Colors[I];
      DragKind := dkDock;
      DragMode := dmAutomatic;
      Position := poDefaultPosOnly;
      Width := 230;
      Height := 100;
      Visible := True;
    end;
end;

[Robert_G]

Wenn du D2005 einsetzt und die CaptionBars der ToolForms in der IDE hübscher findest, reicht es einfach die Unit in der uses Clause zu ändern.
Frag's Pferd wie sie hieß, aber in der OH zum TDockedTabSet sollte es beschrieben sein. :gruebel:

[stoxx]

Das funktioniert in der Tat, obwohl ich nicht wirkich verstehe, warum !
Kann man auf ähnliche einfache Art und Weise erreichen, dass die Fenster beim "zusammendocken" eine Einheit bilden und per TabControl auswählbar sind, like Delphi2005 ?
Unter Delphi kann man dieses Tabcontrol auch "anfassen" und wieder auf den Desktop ziehen, so dass ein frei schwebendes eigenes Fenster entsteht.
Alles sehr coole Features ! Ist das Recht kompliziert ?