function atoi (asc:  anystring): integer;
function atol (asc:  anystring): longint;
function atow (asc:  anystring): word;