AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Treeview - alle Trees expanded

Ein Thema von Matt · begonnen am 10. Nov 2007 · letzter Beitrag vom 10. Nov 2007
Antwort Antwort
Matt

Registriert seit: 13. Nov 2003
Ort: Hamburg
212 Beiträge
 
#1

Treeview - alle Trees expanded

  Alt 10. Nov 2007, 15:17
Hallo DPler,

ich weiß leider keine Suchworte für mein Problem, deswegen frage ich einfach ohne sehr ausführlich gesucht zu haben.

Also ich habe ein Treeview mit bis zu 5 Elementen in die Tiefe. Nun möchte ich gern, um das wilde durchklicken zu vereinfachen, beim öffnen des Formulars bereits alle Knoten (den ersten) aufgeklappt haben, sodass man die 2. Ebene gleich sieht.

Jetzt:

-A
++A1
++A2
+B
+C
+D

Gewünscht:

-A
++A1
++A2
-B
++B1
-C
++C1
-D
++D1


Ist das möglich?

Bin für Eure Anregungen sehr dankbar.

LG aus HH
Matt
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.534 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: Treeview - alle Trees expanded

  Alt 10. Nov 2007, 15:22
IMHO sollte FullExpand das sein, was Du suchst.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von ibp
ibp

Registriert seit: 31. Mär 2004
Ort: Frankfurt am Main
1.511 Beiträge
 
Delphi 7 Architect
 
#3

Re: Treeview - alle Trees expanded

  Alt 10. Nov 2007, 15:23
ja schau mal unter collaps nach...
  Mit Zitat antworten Zitat
marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#4

Re: Treeview - alle Trees expanded

  Alt 10. Nov 2007, 15:28
Hi,

ich habe das so verstanden, dass nur die erste Ebene aufgeklappt werden soll:

Delphi-Quellcode:
procedure TDemoForm.ButtonClick(Sender: TObject);
var
  i: Integer;
  node: TTreeNode;
begin
  with TreeView.Items do
  begin
    BeginUpdate;
    node := GetFirstNode;
    while Assigned(node) do
    begin
      node.Expand(False);
      node := node.getNextSibling;
    end;
    EndUpdate;
  end;
end;
Grüße vom marabu
  Mit Zitat antworten Zitat
Matt

Registriert seit: 13. Nov 2003
Ort: Hamburg
212 Beiträge
 
#5

Re: Treeview - alle Trees expanded

  Alt 10. Nov 2007, 15:31
Danke, dass mit "FullExpand" kenne ich, aber da werden mir ja alle 5 Ebenen angezeigt.

@marabu
JAWOLLLLL... genau das habe ich gemeint, SUPER vielen DANK!!!
  Mit Zitat antworten Zitat
Matt

Registriert seit: 13. Nov 2003
Ort: Hamburg
212 Beiträge
 
#6

Re: Treeview - alle Trees expanded

  Alt 10. Nov 2007, 15:36
@marabu

das merkwürdige ist jetzt nur, dass meine Form nicht mehr maximized ist und ich kann Sie auch nicht vergrößern !!??
Habe dein Quellcode direkt bei onCreate oder onShow getestet, aber es bleibt immer klein.

Selbst ein WindowState := wsmaximized danach hilft nichts!

Gruß Matt
  Mit Zitat antworten Zitat
marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#7

Re: Treeview - alle Trees expanded

  Alt 10. Nov 2007, 15:56
Hi Matt,

ich habe keine Probleme erwartet:

Delphi-Quellcode:
type
  TDemoForm = class(TForm)
    TreeView: TTreeView;
    Button: TButton;
    procedure FormShow(Sender: TObject);
  private
    procedure ExpandTopLevel;
  end;

var
  DemoForm: TDemoForm;

implementation

{$R *.dfm}

procedure TDemoForm.ExpandTopLevel;
var
  i: Integer;
  node: TTreeNode;
begin
  with TreeView.Items do
  begin
    BeginUpdate;
    node := GetFirstNode;
    while Assigned(node) do
    begin
      node.Expand(False);
      node := node.getNextSibling;
    end;
    EndUpdate;
  end;
end;

procedure TDemoForm.FormShow(Sender: TObject);
begin
  ExpandTopLevel;
end;
Funktioniert bei mir mit WindowState = wsMaximized.

Freundliche Grüße
  Mit Zitat antworten Zitat
Matt

Registriert seit: 13. Nov 2003
Ort: Hamburg
212 Beiträge
 
#8

Re: Treeview - alle Trees expanded

  Alt 10. Nov 2007, 16:01
Sorry, war meine Schuld...
Wenn ich das maximized vor dem Expand setze funzt es...

DANKE DIR!!!
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:37 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz