Suche nach "Flyout Panel" (TMS Replacement)

[tsteinmaurer]

Hallo,

bin auf der Suche nach einem "Flyout Panel". Im Wesentlichen was man auch mit z.B. dem Projektmanager in Delphi etc. machen kann. "Pinnen" bzw. automatisch ausblenden lassen ...

Hab derzeit etwas von TMS im Einsatz was allerdings Probleme in Kombination mit der Verwendung auf einem TFrame macht. Leider bewegt sich hier nichts seitens TMS, d.h. ich suche einen (schlanken) Ersatz.

Hat da jemand eine Empfehlung?

Danke und lg,
Thomas

[Andreas L.]

Kannst es auch selber machen:

Panel1.Align im OI auf alLeft gesetzt und dann:

Delphi-Quellcode:

procedure TForm2.Button1Click(Sender: TObject);
var
  Aleft, Atop, Awidth, Aheight: Integer;
begin
  Aleft := panel1.Left;
  Atop := panel1.Top;
  Awidth := panel1.Width;
  Aheight := panel1.Height;

  panel1.Align := alNone;
  panel1.Left := Aleft;
  panel1.Top := Atop;
  panel1.Width := Awidth;
  panel1.Height := Aheight;

  while panel1.Left <> (-panel1.Width) do
  begin
    panel1.Left := panel1.Left - 1;
    Application.ProcessMessages;
  end;

end;

[Jens01]

http://www.lmd.de/products/vcl/lmddockpack/
Das Ding hab ich im Einsatz...

[tsteinmaurer]

Hi!

@Jens01: Hast du das zufällig auch auf einem TFrame im Einsatz?

[Jens01]

Nein, ich weiß aber, dass das auch geht. Ich habe das in dem Demo ausprobiert und es lief eigentlich ganz gut. Zieh Dir doch die Trial-Version.
Edit: "auf einem Frame" oh, falsch gesehen. Das weiß ich nicht. Aber einfach probieren bzw mal bei dem Support fragen (englisch bzw russisch).