Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Letztes Ergebnis von TQuery (nicht .last!) (https://www.delphipraxis.net/97705-letztes-ergebnis-von-tquery-nicht-last.html)

Svenkan 14. Aug 2007 20:29

Datenbank: dBase • Zugriff über: BDE

Letztes Ergebnis von TQuery (nicht .last!)
 
Ich bräuchte eine Möglichkeit zu prüfen, ob der letzte Eintrag einer Ergebnisliste aus TQuery erreicht wurde.
Gibt es da eine bestimmt Eigeenschaft die zählt, welcher Eintrag gerade bheandelt wird, um bspw. dann mit RecordCount zu vergleichen? Oder benötige ich einen zusätzlichen Count?

mkinzler 14. Aug 2007 20:36

Re: Letztes Ergebnis von TQuery (nicht .last!)
 
Wie meinst du das? EOF?

Svenkan 14. Aug 2007 20:40

Re: Letztes Ergebnis von TQuery (nicht .last!)
 
EOF habe ich bereits probiert, leider bin ich damit zu keinem Ergebnis gekommen.
Bin auch davon ausgegangen.
Es geht nämlich darum, die fehlenden Lehrer auflisten zu lassen für einen Tag und am Ende das Trenn-Komma natürlich nicht geschrieben werden brauch.

Delphi-Quellcode:
   if NOT (Query22.EOF) then
    WriteLn(Datei, abkla1+abwss+', ')
   else
    WriteLn(Datei, abkla1+abwss);
Mit einem Count würde es wohl funktionieren, aber ich denke mir, dasses auch noch anders geht (bzw. hoffe es).

mkinzler 14. Aug 2007 20:45

Re: Letztes Ergebnis von TQuery (nicht .last!)
 
Ich mach es immer andersrum. Ich bearbeite zuerst den ersten Datensatz und dann in der Schleife , + nächster Datensatz

Svenkan 14. Aug 2007 20:57

Re: Letztes Ergebnis von TQuery (nicht .last!)
 
Ah!
OK, so funktioniert dann mit BOF.
Dankeschön. ;)

mkinzler 14. Aug 2007 21:02

Re: Letztes Ergebnis von TQuery (nicht .last!)
 
EOF ist erst nach dem letzten DS True und nicht beim letzten.

Svenkan 14. Aug 2007 21:13

Re: Letztes Ergebnis von TQuery (nicht .last!)
 
Deswegen hab ich auch noch versucht, irgendwie einen runterzugehen.
Aber....BOF war jetzt doch die schönere Lösung.


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:11 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz