SELECT Distinct company .... aus LDAP

[DerMike]

Hallo,

wiedermal kamen die Antworten sehr schnell.

Leider funktioniert

SQL-Code:

SELECT DISTINCT i.company 
FROM ( 
SELECT company 
FROM 'LDAP://dc=tcm-i,dc=local' 
WHERE objectclass='user' and objectcategory='person' 
) AS i

nicht.

Mit Stringlisten habe ich noch nie gearbeitet. Wie bringe ich die Daten in eine Stringlist??

Delphi-Quellcode:

 ADOQuery1.Active := TRUE;
 while not ADOQuery1.Eof do begin
  meADGefunden.Lines.Add(VarToStr(ADOQuery1.FieldValues['company']));
  ADOQuery1.Next;
 end;

und ich vermute, ich werde die Ergebnisse anstatt in ein Memo in eine Stringliste schreiben.