Klar, Du könntest eine Methode schreiben, in der Du den Tabellennamen als Parameter übernimmst.
Delphi-Quellcode:
procedure TBlubb.CountRecords(
const Tablename:
string);
const SQL = '
SELECT COUNT(*) FROM %s';
begin
TadoCount.CommandText := Format(
SQL,[Tablename]);
[edit] Wo kommt denn der letzte Post plötzlich her? [/edit]