Delphi-Quellcode:
procedure TfrmMain.TreeView1Click(Sender: TObject);
begin
Memo1.Clear;
ADOQuery1.SQL.Clear;
ADOQuery1.Close;
ADOQuery1.SQL.Text := 'SELECT * FROM ' + TreeView1.{****}
ADOQuery1.Open;
while not ADOQuery1.Eof do
begin
if ADOQuery1.FieldByName('Feld1').AsString = TreeView1.Selected.Text then
begin
Memo1.Lines.Add(ADOQuery1.FieldValues['Feld2']);
end;
ADOQuery1.Next;
end;
end;
ick komme hier nicht weiter wie sage ich den Treeview an der markierten stelle in welchen Node er sich befindet um die passende Tabelle in der
DB zu durchsuchen
als demo hab ichs so gemacht
ADOQuery1.SQL.Text := 'SELECT * FROM Funktionen' ;
so klappt es auch aber halt nur für diesen Node