Panel seitlich ohne Splitter "herausziehen"

[jaenicke]

Meinst du vielleicht so etwas?
http://www.tmssoftware.com/site/toolpanels.asp
Oder auch hier gibt es die Möglichkeit:
http://www.lmdinnovative.com/products/vcl/lmddockpack/

[Opa Knack]

Hallo,

ja, das geht in die richtige Richtung. Wobei ich die Hoffnung hege, dass ich etwas ähnliches auch noch finden kann, ohne dafür gleich ein neues Package kaufen zu müssen. Für entsprechende Tipps bin ich dankbar.

Danke und Gruß
Opa

[EarlyBird]

Mit AnimateWindow kannst Du eventuell selber den Effekt erzeugen den du brauchst

Delphi-Quellcode:

procedure TForm11.btn1Click(Sender: TObject);
begin
  AnimateWindow(panel1.Handle, 600, AW_HOR_POSITIVE or AW_SLIDE or AW_ACTIVATE)
end;

procedure TForm11.btn2Click(Sender: TObject);
begin
  AnimateWindow(panel1.Handle, 600, AW_HOR_NEGATIVE or AW_SLIDE or AW_HIDE)
end;

procedure TForm11.FormShow(Sender: TObject);
begin
 panel1.Hide;
end;

[Geda]

Wenn ich das richtig verstehe, willst Du nicht "ziehen", sondern auf eine fixe Breite/Höhe "ein- und ausklappen".

Ginge z.B. einfach mit Standardeigenschaften/-ereignissen über "Visible", das über eine Aktion (z.B. Schalterdruck) getriggert wird.

Das Überdecken der anderen Controls erreichst Du, indem das Panel
- den gleichen (oder einen übergeordneten) Parent wie die zu überdeckenden Controls hat
- die Eigenschaft "Align" des Panels auf alNone steht
- die Position des Panels bei "OnResize" des übergeordneten Controls an die jeweilige Größe angepasst wird

So das Panel vorher minimiert dargestellt werden soll, kann man statt "Visible" "Height" (beim Einblenden von oben) bzw. "Width" (beim Einblenden von der Seite) bemühen.

"Aktivieren/Deaktivieren" der anderen Controls könntest Du dann in der gleichen Aktion abarbeiten, die auch das Ein-/Ausklappen regelt.

[jaenicke]

In Delphi 10 Seattle gibt es dafür TSplitView wie ich gerade festgestellt habe:
http://docwiki.embarcadero.com/Libra...rls.TSplitView