Hvor mange poster ?

opret en TQuery
Angiv databasenavn
tilføj denne sql text

SELECT X=COUNT(*) FROM TABEL_XXX
Execute Querien
læs værdien fra fieldbyname('X').AsInteger

En anden og måske nemmere måde er at læse RecordCount på tabel/query/storedproc eller hvad du benytter. Men denne værdi er ikke altid udfyldt det afhænger af databasen

eller enkelt:

Brug en tquery:
query1.sql.add('select * from xxx');
query1.execute;
antal_records := query1.recordcount;

og du kan så behandle disse records med

enten:

for i := 0 to antal_records -1 do  {et eller anden}

eller

query1.first;
while not query1.eof do
begin
  {et eller andet}
  query1.next;
end;

så enkelt er det

NB! I mit eks. behøver du ikke varaiblen "antal_records". Du kan bruge:

for i := 0 to query1.recordcount -1 do  {et eller anden}

direkte

Begge dele virker tilsyneladende. Nu brokker den sig ikke over SQL'en.

I stedet skriver hele tiden at jeg ikke har adgang til det åbne eller lukkede TDataset (TQuery). Jeg har altså prøvet på at kalde hhv. open og close funktionen på Query, men den brokker sig stadig. Jeg har også undersøgt Databasen var aktiveret eller ej.

Prøv at sende en udtræk af din kode

Din TQuery skal pege på en database, enten via et alias eller med et drev/sti/navn på de aktuelle db.

Sæt tquery propertien "Database" til enten et aliasnavn (som du kan vælge fra listen og som peger på det sted din db er) eller udfyld den med f.eks. C:\minstu\mindatabase.mdb

Tak for hjælpen begge to nu virker det.