Continue
Verze z 5. 10. 2012, 17:49, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (1 revízia: Unit System)
Pokračuje v příkazu for, while nebo repeat.
- Deklarace
procedure Continue
- Režim
- Windows, Reálný, Chráněný
- Viz také
- Break
Vzorový příklad
{Continue.PAS} {Vzorový příklad pro proceduru Continue.} { Pro Windows: } { uses WinCrt; } var I: Integer; Name: string[79]; F: file; begin for I := 1 to ParamCount do begin Name := ParamStr(I); Assign(F, Name); {$I-} Reset(F, 1); {$I+} if IOResult <> 0 then begin WriteLn('Soubor nenalezen: ', Name); Continue; end; WriteLn(Name, ': ', FileSize(F), ' bajtů'); Close(F); end; end.