Bob, at 08:42 on Apr 26 1996, you wrote to All ...

BL> I need a really fast String-to-Integer converter. This is
BL> what I'm using and I can't think of anything smaller or 
BL> faster, but it would be nice if it was twice as fast. My 
BL> string is just a number with junk I don't care about 
BL> following it.


BL> function StrInt(s: string): integer;
BL> var
BL> i, size: integer;
BL> begin
BL>    i := 1; size := 0;
BL>    while s[i] in ['0'..'9'] do begin
BL>       size := size * 10 + (Ord(s[i]) - 48);
BL>       inc(i);
BL>    end;
BL>    StrInt := size;
BL> end;

Check out VAL()

David
@EOT:

--- Msgedsq/2 3.10