Entwickler-Ecke :: Thema anzeigen - Abfrage auf Datensatzzeiger in Tabelle

rob87 - Di 02.09.08 14:21
Titel: Abfrage auf Datensatzzeiger in Tabelle

Ich steh momentan glaub ich etwas aufm Schlauch.

Ich will einen Code so schreiben, dass wenn mein Datensatzzeiger beim letzten Datensatz is, soll er beim ersten weitermachen.

Wenn ich so code:

Delphi-Quelltext

1:
2:
3:
4:
5:

if Table1.EoF then
  Table1.First;
end else begin
  Table1.Next;
end;

, macht er mir den letzten Datensatz immer doppelt. Is ja auch klar.

Aber den Befehl Table1.Last den gibts ja nicht mit Boolean??? Es gibt nur die Methode Last;

Ich brauch ein: "If Table1.Last then ...." oder so in der Richtung. Aber Table1.Last; positioniert ja nur den Datenzeiger an die letzte Stelle.

Helfts ma... :roll: :roll:

alzaimar - Di 02.09.08 15:53

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

Procedure CircleNext (aDataset : TDataset);
Begin
  If aDataset.Eof Then
    aDataset.First
  Else Begin
    aDataSet.Next;
   If aDataset.Eof Then
     aDataset.First
  End
End;

Ungetestet.

rob87 - Mi 03.09.08 10:26

rob87 hat folgendes geschrieben:

alzaimar hat folgendes geschrieben:

Ungetestet.

Mach ich nachher gleich mal. Werde berichten. :wink:

Basst! Super. Merci. :lol:

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!