Endlos Schleife

[ngott2]

Hallo, liebe Community.
Ich habe eine Schleife gebaut die aus irgend einem Grund eine Endlosschleife ist.
Die Bedingung bei einer While Schleife geht. Aber er muss leider mindestens einmal Durchlaufen.
Habe ich irgendwo einen Denkfehler.

Code:

repeat
    DokumentID.ID := Query.FieldByName('DID').AsInteger;   // DID =DocumentID
    DokumentID.ID := Query.FieldByName('CID').AsInteger;  // CID = CompanyID
    Result.Add(DocumentID);
    query.Next
  until (not query.Eof);

Hier ist noch meine Sql Anweisung

Code:

Query.SQL.Text := 'Select ID As DID ,CompanyID As CID from [Document] Where Status = 1 and LoadForEmployee = false Order By CompanyID';

Danke im Voraus.

[Mikkey]

nehme ein "not" heraus, dann wird ein Schuh draus

[DeddyH]

Zitat:

Delphi-Quellcode:

until (not query.Eof);

Ob das so stimmt?

[sirius]

Delphi-Quellcode:

until (query.Eof);

Bei einem oder keinem Eintrag wird das sonst zu einer Endlosschleife.

[DeddyH]

Wobei ich mich frage, ob der Fußschleifenansatz generell richtig sein kann. Was sollen denn die Felder enthalten, wenn die Datenmenge leer ist?

[Mikkey]

nehme ein "not" heraus, dann wird ein Schuh draus


edit:

Besser:

Delphi-Quellcode:

var fldDID, fldCID: TField;
...
    fldDID := Query.FieldByName('DID');  // DID =DocumentID
    fldCID := Query.FieldByName('CID'); // CID = CompanyID
    repeat
      DokumentID.ID := fldDID.AsInteger;  // DID =DocumentID
      DokumentID.ID := fldCID.AsInteger; //<== dies ist dasselbe Feld/Property, gewollt?????
      Result.Add(DocumentID);
      query.Next
    until query.EOF;

[sirius]

Zitat:

Zitat von DeddyH (Beitrag 1240252)

Wobei ich mich frage, ob der Fußschleifenansatz generell richtig sein kann. Was sollen denn die Felder enthalten, wenn die Datenmenge leer ist?

Vielleicht ist die Datenmenge per Definition nicht leer. Was durchaus woanders bereits abgefragt werden könnte, weil sonst die Ausführung des gesamten Programms keinen Sinn macht. ;-)

[DeddyH]

Wenn die Datenmenge generell nicht leer ist, wird sie auch mit einer Kopfschleife mindestens einmal durchlaufen ;)

[sirius]

Zitat:

Zitat von DeddyH (Beitrag 1240255)

Wenn die Datenmenge generell nicht leer ist, wird sie auch mit einer Kopfschleife mindestens einmal durchlaufen ;)

Stimmt. Dann vielleicht ..... Trigger? Stored Procs? Entführung von einem Alien? ...:?:

[baumina]

Ich würde bevor ich zu einem Alien greifen würde, lieber eine while-Schleife draus machen...