Einzelnen Beitrag anzeigen

Benutzerbild von harrybo
harrybo

Registriert seit: 26. Nov 2002
Ort: Aachen
87 Beiträge
 
Delphi 6 Enterprise
 
#3
  Alt 26. Nov 2002, 13:23
Hi FBrust,

möglicherweise öffnest Du an anderer Stelle das Query-Object. Um sicher zu gehen, dass wirklich neu eingelesen wird kann man folgendes schreiben:
Code:
    with dmQueries.qryCustList do begin
      if Active then
        Close;
      Active := True;
      while not Eof do begin
        clbCust.Items.Add(FieldByName('strShortName').AsString);
        Next;
      end;
      Close;
    end;
gruß, harrybo
Harry Boldt
  Mit Zitat antworten Zitat