Sry für Doppelpost.
Also, maybe habe ich das Problem ein klein wenig eingeschränkt?
Ich hab den Quelltext mal ein wenig abgewandelt.
Delphi-Quellcode:
procedure TForm1.btn2Click(Sender: TObject);
begin
DataModule2.con1.Close;
DataModule2.con1.Open;
Datamodule2.qry1.Close;
DataModule2.qry1.SQL.Clear;
datamodule2.qry1.SQL.Add('
SELECT TOP 10 (*) FROM ''
LDAP:\\DC=****,DC=lan''
');
DataModule2.qry1.Open;
//< Wieder knallt es HIER!
DataModule2.qry1.First;
while not DataModule2.qry1.Eof
do
begin
mmo1.Lines.Add(DataModule2.qry1.FieldByName('
displayname').AsString);
DataModule2.qry1.Next;
end;
end;
Wenn es knallt, dann kommt diesmal aber ein klein wenig anderer Fehler:
Zitat:
Exception-Klasse EAccessViolation mit Meldung 'Zugriffsverletzung bei Adresse 004F844B in Modul 'TestADO.exe'."