Einzelnen Beitrag anzeigen

Nils_13

Registriert seit: 15. Nov 2004
2.647 Beiträge
 
#1

TBX: Floatingwechsel macht Dockprobleme

  Alt 9. Jan 2007, 12:34
Hi,

es ist mit dem Code (unten) nur möglich, 1x fehlerfrei, mit einem TBXDockablePanel, zwischen Docked und Undocked zu wechseln: Beim 1. Mal wird es aus dem Dock genommen und auch wieder in den vorherigen (es werden am Ende mehrere TBXDockablePanels sein) Dock zurückgesetzt [gewünscht]. Beim 2. Mal wird es, wie gewünscht, herausgenommen, aber an die Position 0 (X) und 0 (Y) der Form gesetzt, obwohl es wieder in den Dock zurück soll, in dem es zuvor war [ungewünscht]. Ich sehe meinen Fehler nicht, sieht ihn jemand von euch ?
Delphi-Quellcode:
  private
    olddock : TTBDock;

[...]

procedure TfrmMain.Button3Click(Sender: TObject);
begin
  // tbxdp_std = TBXDockablePanel
  olddock := tbxdp_std.CurrentDock;
  tbxdp_std.Floating := True;
end;

procedure TfrmMain.Button4Click(Sender: TObject);
begin
  // tbxdp_std = TBXDockablePanel
  tbxdp_std.Dock(olddock, olddock.ClientRect);
  tbxdp_std.Floating := False;
end;
  Mit Zitat antworten Zitat