Val: Porovnání verzí

Z Delphi & Pascal (česká wiki)
Skočit na navigaci Skočit na vyhledávání
m (1 revízia: Unit System)
 
Řádek 40: Řádek 40:
 
[[Category:System]]
 
[[Category:System]]
 
[[Category:Procedúry System]]
 
[[Category:Procedúry System]]
 +
[[Category:Řetězcové procedury a funkce]]

Aktuální verze z 5. 10. 2012, 21:01

Převede znakový řetězec na číselnou hodnotu.

Deklarace
procedure Val(S; var V; var Code: Integer);

kde:

  • S - proměnná typu string nebo typu PChar; musí to být posloupnost znaků, které tvoří číslo se znaménkem
  • V - proměnná celočíselného nebo reálného typu
  • Code - proměnná typu Integer
Režim
Windows, Reálný, Chráněný
Poznámky
Převede řetězcovou hodnotu (S) do její číselné reprezentace stejně, jako kdyby byla přečtena z textového souboru procedurou Read.
Viz také
Str


Vzorový příklad

{Val.PAS}
{Vzorový příklad pro proceduru Val.}
{ Pro Windows: }
{ uses WinCrt; }
var I, Code: Integer;
begin
{ Získání textu z příkazové řádky }
  Val(ParamStr(1), I, Code);
  { Chyba při konverzi na celé číslo? }
  if code <> 0 then
    Writeln('Chyba na pozici: ', Code)
  else
    Writeln('Hodnota = ', I);
  Readln;
end.