Delphi - While statement

Published --