строка в число

[Stels]

Мне нужно вытащить из строки число. Можно ли как-то это реализовать?
Пробовал паскалевскую команду VAL, но стелс ругается, что не знает такую команду

Вот код, который я пробую

Code: Select all

procedure GetNum(x:integer;j:integer);
var st1: string;
begin
st1:=copy(lastmsg,j+x,1);
VAL(st1,a);    
end;

и ответ стелса

Code: Select all

Unknown identifier 'VAL'

оказалось, что стелс понимает StrToInt )))))

[Vizit0r]

классика паскаля - StrToInt

пробрасывать все "низкие" команды в стелс - смысла немного.