Problem mit Bedingung in einer While-Schleife

[LoL]

Die Abfrage einer While schleife muss von Typ Boolean sein! Was du gemacht hast ist eine zuweisung!

Delphi-Quellcode:

while Pos('~', NewMsg) > 0 do 
~
end;