Forum: Datenbanken
Delphi
by DeddyH,
11. Mär 2020
Ist ja nicht so, dass ich das nicht schon vor ein paar Seiten angesprochen hätte :roll:
Forum: Datenbanken
Delphi
by DeddyH,
9. Mär 2020
Bin ich irgendwie unsichtbar oder sowas? Wozu ist die Schleife gut?
Forum: Datenbanken
Delphi
by DeddyH,
8. Mär 2020
Genau darauf will ich hinaus.
Forum: Datenbanken
Delphi
by DeddyH,
8. Mär 2020
Nach einem Open stehe ich auf dem ersten Datensatz oder auf Eof, wenn es keinen Datensatz gibt. Wozu jetzt die Schleife, ich will doch initial den ersten?
Forum: Datenbanken
Delphi
by DeddyH,
8. Mär 2020
Wieso wird denn immer in einer Schleife das Dataset durchlaufen? Ich würde ja bei der ersten Frage öffnen und bei Click auf den Button dann eins weiter positionieren. Oder übersehe ich da etwas?
Forum: Datenbanken
Delphi
by DeddyH,
8. Mär 2020
Wenn man in einer Schleife die gesamte Datenmenge durchläuft und anschließend die Daten anzeigt, welchen Datensatz stellt man dann dar? Den letzten, oder? Dann nützt dir auch kein „Weiter“-Button. Aber klar, Struktogramme usw. braucht man ja nicht.
Forum: Datenbanken
Delphi
by DeddyH,
8. Mär 2020
Vielleicht wäre es auch sinnvoller, den Code erst einmal zu vergessen und sich den Ablauf einmal klassisch auf Papier aufzuzeichnen, das kann ein Struktogramm, ein PAP oder einfach etwas eigenes sein, Hauptsache, man kann seinen Gedankengang später nachvollziehen. Wenn man dann der Meinung ist, dass das so funktioniert, formuliert man das dann in Code.
Forum: Datenbanken
Delphi
by DeddyH,
8. Mär 2020
Setz mal einen Haltepunkt innerhalb der while-Schleife.
Forum: Datenbanken
Delphi
by DeddyH,
8. Mär 2020
Nochmal: deine Schleifenbedingung bedeutet, dass AdoQuery6 nicht am letzten Datensatz angekommen sein darf, AdoQuery7 aber muss. Und durch den fehlenden begin-end-Block wird nur eins der beiden Queries angesprochen. Korrigier das jetzt erst einmal, dann sehen wir weiter.
Forum: Datenbanken
Delphi
by DeddyH,
8. Mär 2020
Das entspricht logisch
while (not (Datamodule1.ADOQuery6.Eof)) and (Datamodule1.ADOQuery7.Eof) do
Sicher, dass das so stimmt?
Forum: Datenbanken
Delphi
by DeddyH,
8. Mär 2020
Beispielhaft mal 3 Zeilen, aber korrekt eingerückt:
while not (Datamodule1.ADOQuery6.Eof) and (Datamodule1.ADOQuery7.Eof) do
Datamodule1.ADOQuery6.Next;
Datamodule1.ADOQuery7.Next;
Fällt Dir da etwas auf?
Das sind wahrscheinlich gleich 2 Fehler in 3 Zeilen