"Gene Feudorov" <gene_feudorov-JGs/[EMAIL PROTECTED]> wrote in message 
news:[EMAIL PROTECTED]
> SR> StrToInt(Fields[0].AsString);
> хлопцы, я вам щё скажу, шо Val будет швидчее StrToInt робить!
> заняцца вам нечем :-)

Это с какой такой радости-то, если это одно и то же?..
> --~--~---------~--~----~------------~-------~--~----~
function StrToInt(const S: string): Integer;
var
  E: Integer;
begin
  Val(S, Result, E);
  if E <> 0 then ConvertErrorFmt(@SInvalidInteger, [S]);
end;
> --~--~---------~--~----~------------~-------~--~----~
-- 
[http://bakh.spb.ru] [email:bob#bakh.spb.ru] [icq:1608235]

Ответить