var
thestring : string;
thenumber : integer or real;
theerrorcode : integer;
begin
Val(thestring, thenumber, theerrocode);
if code <> 0 then
writeln('Error in string at ', theerrorcode)
else
writeln('The number you converted is ', thenumber);
end
Main Topics
Browse All Topics





by: mlmccPosted on 2003-08-21 at 06:42:12ID: 9195410
If my memory serves me correctly, Val is actually a function.
MyValue := Val(MyString);
mlmcc