Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Tree View ??


förster - Fr 04.03.05 18:48
Titel: Tree View ??
Hallöle,

ich murkse gerade an meine sage und schreibe erstem Delphi Programm herum und habe folgendes Problem:

Ich habe eine Datenbank-Tabelle (Paradox) wie folgt mit einem Treeview verbunden:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
procedure TForm1.FormShow(Sender: TObject);
var n : TTreeNode;
begin

TreeView1.Items.Clear;
Form2.Table1.First;

while not Form2.Table1.Eof do
   begin
     TreeView1.Items.Add(nil, Form2.Table1.FieldByName('Forstbetrieb').AsString);
     n.ImageIndex := 0;
     Form2.Table1.next;
    end;

end;



ähnliches auch in Form2.

Wie kriege ich es nun hin, das beim anklicken eines Nodes Form2 geöffnet und der entsprechende Eintrag angezeigt wird ?

Gruß

förster


retnyg - Fr 04.03.05 19:38

verwende GetNodeAt im onClick event des Treeviews.


förster - Sa 05.03.05 10:08

Erstmal vielen Dank für den Tipp.

Erklär mir aber bitte noch wie das funktioniern soll. Mit GetNodeAT kriege ich doch nir die Koordinasten des Nodes. :?:

gruß förster


retnyg - Sa 05.03.05 14:18

nein. mit getnodeAt kriegst du das Node bei den angegebenen koordinaten (wie der name schon sagt)
die koordinaten der aktuellen maus-posi kriegst du mit GetCursorPos.


förster - Mi 09.03.05 21:43

Ah :D
das kalappt !

vielen Dank für den Tipp