Datenbanken durchsuchen und auflisten

[RWarnecke]

Du brauchst folgende Komponenten :

• 1x TZConnection
• 2x TZQuery
• 2x TDBGrid
• 2x TDataset

Nun verbindest Du im Objektinspector die beiden TZQuery mit der TZConnection. Dann verbindest Du jeweils eine TZQuery mit einer TDataSource, das gleiche machst Du nun noch mit TDataSource und TDBGrid. Im OI der einen TZQuery1 schreibst Du in die Eigenschaft "SQL" folgendes rein : (Tabelle1 = Kundenandressen/Tabelle2 = Hardwaretabelle)
SELECT * FROM Tabelle1; In die zweite TZQuery2 schreibst Du ebenfalls in die Eigenschaft "SQL" folgendes rein :
SELECT * FROM Tabelle1 where Name=:spaltename; Nun musst Du nur noch in der Procedure, wo Du den Inhalt der Spalte Name aus DBGrid1 ausliest folgendes reinschreiben :

Delphi-Quellcode:

var
  name : string;
begin
  { Auslesen des Namens der ausgewählten Zeile des DBGrid1 }
  TZQuery2.ParamByName('spaltename').AsString := name;
  TZQuery2.Open;
  { ... }
end;

Alles ungetestet, sollte aber funktionieren.

Edit 1 u. 4: Textkorrektur vorgenommen

Edit 2: Ich würde Dir vielleicht noch dieses Tutorial ans Herz legen. Darin ist die Funktionsweise der Zeos Komponenten sehr gut erklärt.

Edit 3: Oder dieses Tutorial.

Edit 5: In diesem Beitrag findest Du noch einen Hinweis wie Du den Wert des selketierten Datensatzes und des selektierten Feldes ermittelst.