Problem mit Bedingung in einer While-Schleife

**MrBona**

Also... ich hab hier folgendes:

Delphi-Quellcode:

			  if Prot = 'l:' then

  begin

    ChatUserOutput.Clear;

    if NewMsg = '' then

    begin

      NewMsg := Msg

    end;

    while TPos := Pos('~', NewMsg) do

      User := Copy(NewMsg, 1, TPos-1);

      ChatUserOutput.Items.Add(User);

      NewMsg := Copy(NewMsg, TPos+1, length((NewMsg - length(User)) - 1);

    end;

  end;

Mein Problem ist, das die Bedingung der while Schleife kein boolean ist. In anderen Programmiersprachen wie etwa PHP hat nämlich eine Zuweisung einen Rückgabewert von true oder false. In Delphi wohl leider nicht. Wie kann ich das also machen?
Danke schonmal für die Hilfe

Problem mit Bedingung in einer While-Schleife

Problem mit Bedingung in einer While-Schleife

Forumregeln