Moin...
In der Hoffnung die Frage richtig verstanden zu haben...
Code:
select distinct Schrank, Schublade from Tabelle where Fach = 'Schraube_50'
Delphi-Quellcode:
Qry.SQL.Text := 'select distinct Schrank, Schublade from Tabelle where Fach = :FAC';
Qry.ParamByName('FAC').AsString := 'Schraube_50';
Qry.Open;
Index auf Feld 'Fach'
kein "
like" verwenden weil sonst der Index nicht greift