Hallo,
ich kann Dir Deine Frage nicht beantworten.
Versuche doch mal sowas:
Delphi-Quellcode:
var
Sid : Windows.PSID;
begin
... Dein bisheriger Code
Sid := ADOQuery1.FieldByName('objectSid').AsVariant;
...
Und das übergibst Du dann an diese
http://www.delphipraxis.net/internal...=708762#708762 Funktion.