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 Knotenbenennung Treeview (https://www.delphipraxis.net/70975-knotenbenennung-treeview.html)

regiontop 7. Jun 2006 14:36


Knotenbenennung Treeview
 
Hallo,

ich habe ine Projekt in dem ich Adressen, Gebäude und Wohnungen in einem TTreeview darstelle. Das funktioniert nun ganz gut (dank der Hilfe von marabu).

Meine Frage wäre: Wie kann ich die einzelnen Knoten umbenennen. Der Baum wird direkt aus meiner DB erzeugt.
Statt "23" soll aber besser "Hausnummer 23" o.ä. erscheinen. Eine einfache Ergänzung nach dem Schema
Delphi-Quellcode:
treeview1.items.addchild(node,'Hausnummer'+ inttostr(aktgeb.hnr));
funktioniert leider nicht. Auch noch interessant wäre die Kombination von zwei Feldern (z.B. Hausnummer und Hausnummernzusatz) in einem Knoten.

Für Tipps (möglichst mit Code) bin ich dankbar...

marabu 7. Jun 2006 16:14

Re: Knotenbenennung Treeview
 
Hallo Andreas,

ich glaube nicht das dein Problem die Benennung des Knoten ist, sondern eher die Beschaffung des Textes für die Benennung. Du kannst das gut selbst überprüfen:

Delphi-Quellcode:
var
  sText: String;
begin
  // ...
  sText := 'Hausnummer ' + IntToStr(aktGeb.HNr);
  treeview1.items.addchild(node, sText);
  // ...
end;
Deine Probleme müssten mit dem Zugriff auf aktGeb.HNr zusammenhängen.

Grüße vom marabu

regiontop 8. Jun 2006 08:50

Re: Knotenbenennung Treeview
 
Ja, genau. Den Codeschnippsel habe ich schon mehrfach probiert (und es funktioniert nicht).

Gibt es vielleicht die Möglichkeit zwei Felder der DB in einem Knoten darzustellen?

marabu 8. Jun 2006 09:02

Re: Knotenbenennung Treeview
 
Da gibt es keine Restriktion. Dem Knoten ist es egal, wie du ihn bezeichnest. Hast du denn den Fehler schon genauer lokalisieren können?

marabu


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