TADOTable.Active = true mit Fortschritt

[r_kerber]

select count(*) from tabelle; Aber auch das kann bei großen Tabellen etwas länger dauern.

[Nalincah]

Ich hab vor das so zu machen:

Delphi-Quellcode:

TempQuery := TADOQuery.Create(nil);
try
  TempQuery.Connection := Con;
  TempQuery.SQL.Text := 'Select Count(*) from ' + ListBoxTable.Items[ListBoxTable.ItemIndex];
  TempQuery.ExecSQL;
finally
  TempQuery.Free;
end;

Leider weiß ich nicht wie ich jetzt das Ergebnis auslesen kann

[r_kerber]

Ungetestet:

Delphi-Quellcode:

TempQuery := TADOQuery.Create(nil);
try
  TempQuery.Connection := Con;
  TempQuery.SQL.Text := 'Select Count(*) as anzahl from ' + ListBoxTable.Items[ListBoxTable.ItemIndex];
  iAnzahl := TempQuery.FieldByName('anzahl').AsInteger;
  TempQuery.ExecSQL;
finally
  TempQuery.Free;

[Sharky]

Anstelle von .ExecSQL sollte .Open verwendet werden.
ExecSQL soll nur bei SQL-Befehlen die keine Ergebnisse zurück liefer benutzt werden (Update,Delete,usw).

[r_kerber]

Zitat von Sharky:

Anstelle von .ExecSQL sollte .Open verwendet werden.
ExecSQL soll nur bei SQL-Befehlen die keine Ergebnisse zurück liefer benutzt werden (Update,Delete,usw).

Stimmt. Mein Fehler.

[Nalincah]

Danke @ all
Hab das jetzt so gemacht das der User gefragt wird, sobald es mehr als 10000 Datensätze sind