Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Treeview (https://www.delphipraxis.net/20114-treeview.html)

Reini64 13. Apr 2004 21:07


Treeview
 
Hi,

ich habe folgendes Problem:

Erzeuge eine neue Treeview wie folgt:

Mitglieder
Müller
Müller
Schmitt
Schmidt
...

wie kann ich nun unterscheiden welcher "Müller" ich jetzt damit gemeint ist.

Gubt es ein Schlüssel womit ich das beim erzeugen festlegen kann??

für Eure Hilfe möchte ich mich herzlich bedanken

Gruß

Reinhard

Christian Seehase 13. Apr 2004 21:09

Re: Treeview
 
Moin Reinhard,

Du könntest in der Eigenschaft Data eines Nodes noch weitere Daten zu dem Node unterbringen, sei es direkt (32 Bit Wert) oder indirekt (Pointer auf eine Datenstruktur)

Reini64 13. Apr 2004 21:17

Re: Treeview
 
hi chris,

ich kann leider mit deiner Aussage nicht viel anfangen!? kannst Du mir das vielleicht etwas genauer beschreiben?

hier mein treeview

Delphi-Quellcode:
    for I :=1 to DM_kunden.t_kundensuche.RecordCount DO
      begin
         with TreeView1.Items Do
              begin
                //erste Ebene
                 Ebene1 := add(NIL,trim(dm_kunden.t_kundensuche['name']) + ' ' + trim(dm_kunden.t_kundensuche['vorname']) +
                            ' ' + dm_kunden.t_kundensuche['kdnr']);
              end;
          DM_kunden.t_kundensuche.Next;
      end;
wo kann ich hier z.B. die record id festlegen?

gruß

Reinhard

neolithos 13. Apr 2004 21:20

Re: Treeview
 
Wenn dm_kunden.t_kundensuche['kdnr'] einen Integer als ID zurückgibt. Könnte man dem erzeugten TreeNode über die Eigenschaft Data die ID setzen.

Denkanstoß:
Delphi-Quellcode:
treeitem = tvw.Items.Add(nil, 'test');
treeitem.Data := Pointer(id);

Christian Seehase 13. Apr 2004 21:25

Re: Treeview
 
Moin Reinhard,

Annahme:
I sei die Record ID.

Jetzt fügst Du also einen neuen Eintrag hinzu

Delphi-Quellcode:
Ebene1 := Add(.....);
damit hast Du also, durch Ebene1 (ist ja vom Typ TTreeNode), direkten Zugriff auf den neuen Node, und kannst mit

Delphi-Quellcode:
Ebene1.Data := Pointer(I);
gleich noch die Record ID dem Node hinzufügen.

Auslesen ginge dann umgekehrt:

Delphi-Quellcode:
I := Integer(Ebene1.Data);

Reini64 13. Apr 2004 22:12

Re: Treeview
 
Hi Chris,

mit den pointer hat soweit wunderbar geklapp, Danke!!!

Ich habe aber noch ein Problem, wie bekomme ich die Daten aus der Selectzeile ausgelesen ?

gruß
Reinhard

Christian Seehase 13. Apr 2004 22:17

Re: Treeview
 
Moin Reinhard,

ich habe so den Eindruck, dass die jetzt aufkommende Frage eine neue darstellt, und möchte Dich deshalb bitten diese in einem neuen Thread zu stellen.
Damit die Übersicht gewahrt bleibt, gilt hier die Regel: Neue Frage - Neuer Thread.

Danke.

Reini64 13. Apr 2004 22:26

Re: Treeview
 
Danke für den Hinweis, war mir nicht bewußt!


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:42 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