Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories

In this Discussion

How to get a dkDocument Panel count

Carlo Marangoni
in LMD-Tools Vote Up0Vote Down
Hi folks;

Could someone direct me or show me how to get a count of all currently opened document panels that are open in the docking control pack.

Thank you.

Comments

  • 2 Comments sorted by Votes Date Added
  • Eugene Balabuev (LMD)
    Posts: 0 Accepted Answer Vote Up0Vote Down
    You can count them manually by iterating form's child components:

    procedure TForm4.Button1Click(Sender: TObject);
    var
      i:   Integer;
      cnt: Integer;
    begin
      cnt := 0;
      for i := 0 to ComponentCount- 1 do
      begin
        if (Components[i] is TLMDDockPanel) and
           (TLMDDockPanel(Components[i]).ClientKind = dkDocument) then
          Inc(cnt);
      end;
    end;
  • Carlo Marangoni
    Posts: 22Vote Up0Vote Down
    Thank you this helps.
Sign In or Register to comment.