Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi GetFieldNames mit ADO (https://www.delphipraxis.net/52530-getfieldnames-mit-ado.html)

japetos 30. Aug 2005 14:25

Datenbank: MSSQL • Version: 2.8 • Zugriff über: mit ADO

GetFieldNames mit ADO
 
Hallo erstmal an alle Delhpispezialisten!!! :-D

Ich habe folgendes Problem:
So sieht im Mom mein Code aus:
Delphi-Quellcode:
procedure TMainForm.GetTablesT2;
var
   i, j : Integer;
   node, fnode : TTreeNode;
   list : TStrings;
begin
   i := 14;   // Database-Nr.: KSH_Programming
   ADOConnection1.GetTableNames(ComboBox1.Items);
   TreeView2.Items.Clear;
   list := TStringList.Create;
   try
      begin
         node := TreeView2.Items.AddChild(nil, ComboBox1.Items[i]);
         ADOConnection1.GetFieldNames(ComboBox1.Items[i], list);
         for j:=0 to list.Count -1 do
         begin
            fnode := TreeView2.Items.AddChild(node, list[j]);
         end;
      end;
   finally
      list.Free;
   end;
end;
Ich moechte jetzt aber nicht die TableNames, sondern direkt auf die FiledNames zugreifen und aus denen den Baum erstellen. Denn im Moment wird ein Bau aus den Spalten der Tabelle erstellt.
Die Tabelle hat 3 Spalten: id, owner_id, bla;
die id mit owner_id=0 soll immer ein Knoten sein.

Ich hoffe ich hab mich nicht unverstaendlich ausgedrueckt.

jensw_2000 30. Aug 2005 21:08

Re: GetFieldNames mit ADO
 
Liste der Anhänge anzeigen (Anzahl: 1)
Ich habe dir ein Spielprojekt mit Source angehängt.
Es ist ein einfaches Quick And Dirty Projekt, aber ich denke, das du dort findest was du suchst ...



Schöne Grüße,
Jens

japetos 30. Aug 2005 21:19

Re: GetFieldNames mit ADO
 
sehr geil. Echt klasse von dir.

aber das Problem ist ja nicht geloest.
ich will ja nicht die Spalten im Baum, sondern deren Inhalt.

Ich bin trotzdem fasiniert.

MERCI :)


P.S.:
Hab gehoert man muss das mit sowas wie einer REKURSION machen.
was immer das acu hsein mag.

jensw_2000 30. Aug 2005 23:15

Re: GetFieldNames mit ADO
 
Zitat:

aber das Problem ist ja nicht geloest.
ich will ja nicht die Spalten im Baum, sondern deren Inhalt.
Sorry, das habe ich nicht rausgelesen ... :oops:

Ich habe das Attachment vom vorherigen Post aktualisiert ...
Eventuell trifft das die Aufgabe jetzt besser :mrgreen:


Schöne Grüße,
Jens

japetos 30. Aug 2005 23:56

Re: GetFieldNames mit ADO
 
Vielen Dank.
Werde es mir morgen früh (mittag -> zeitverschiebung) anschauen.

japetos 31. Aug 2005 13:05

Re: GetFieldNames mit ADO
 
Echt klasse das ding.
Ist zwar immernoch nicht das was ich suche. Aberich weiss deine Muehe zu schaetzen.

Schoene Gruesse

shmia 31. Aug 2005 15:29

Re: GetFieldNames mit ADO
 
Zitat:

Zitat von japetos
Ich moechte jetzt aber nicht die TableNames, sondern direkt auf die FiledNames zugreifen und aus denen den Baum erstellen. Denn im Moment wird ein Bau aus den Spalten der Tabelle erstellt.
Die Tabelle hat 3 Spalten: id, owner_id, bla;
die id mit owner_id=0 soll immer ein Knoten sein.
Ich hoffe ich hab mich nicht unverstaendlich ausgedrueckt.

Doch ziemlich unverständlich. :shock:
Du willst sagen, dass die eine Tabelle mit folgender Struktur hast:
Code:
id, owner_id, bla
=======================
0          0  Wurzel
1          0  Ebene1-A
2          0  Ebene1-B
3          2  Ebene2-B
Die Daten sollen als Baum abgebildet werden, richtig ????
Da gäbe es übrigens schon fertige Komponenten dafür. Die werden als DBTree oder ähnlich bezeichnet.
http://www.torry.net/pages.php?id=536


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