Re: ""FIBPlus IBX DBExpress - " " ""
"Gene Feudorov" 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]
Re: ""FIBPlus IBX DBExpress - " " ""
Hello, Vladimir A.Bakhvaloff! You wrote on Thu, 25 May 2006 13:02:39 +0400: >> ÈÌÏÐÃÙ, Ñ ×ÁÍ Ý£ ÓËÁÖÕ, ÛÏ Val ÂÕÄÅÔ Û×ÉÄÞÅÅ StrToInt ÒÏÂÉÔØ! >> ÚÁÎÑÃÃÁ ×ÁÍ ÎÅÞÅÍ :-) VA> üÔÏ Ó ËÁËÏÊ ÔÁËÏÊ ÒÁÄÏÓÔÉ-ÔÏ, ÅÓÌÉ ÜÔÏ ÏÄÎÏ É ÔÏ ÖÅ?.. >> --~--~-~--~~~---~--~~ VA> function StrToInt(const S: string): Integer; VA> var VA> E: Integer; VA> begin VA> Val(S, Result, E); VA> if E <> 0 then ConvertErrorFmt(@SInvalidInteger, [S]); VA> end; >> --~--~-~--~~~---~--~~ ÎÕ ×ÏÔ ÓÁÍ ÖÅ ×ÉÄÉÛØ, ÛÏ ÎÅ ÏÄÎÏ É ÔÏ ÖÅ! ÍÏÖÅÛØ ÓÒÁ×ÎÉÔØ ÔÉËÉ, ÅÖÅÌÉ ÏÞÅÎØ ÎÁÄÏ :-) æ£ÄÏÒÏ× å×ÇÅÎÉÊ. úáï "ôÒÅÓÔ-í". åËÁÔÅÒÉÎÂÕÒÇ.
Re: ""FIBPlus IBX DBExpress - " " ""
"Gene Feudorov" wrote in message news:[EMAIL PROTECTED] > >> хлопцы, я вам щё скажу, шо Val будет швидчее StrToInt робить! > >> заняцца вам нечем :-) > VA> Это с какой такой радости-то, если это одно и то же?.. > VA> if E <> 0 then ConvertErrorFmt(@SInvalidInteger, [S]); > ну вот сам же видишь, шо не одно и то же! > можешь сравнить тики, ежели очень надо :-) Не, ну ясен перец, что будет меньше на вызов процедуры и на if!.. ;))) А если вообще заменить на асмовую вставку?.. %))) -- [http://bakh.spb.ru] [email:bob#bakh.spb.ru] [icq:1608235] --~--~-~--~~~---~--~~ -~--~~~~--~~--~--~---
Re: ""FIBPlus IBX DBExpress - " " ""
Привет, Vladimir! Вы пишешь 25 мая 2006: VA>>> Это с какой такой радости-то, если это одно и то же?.. VA>>> if E <> 0 then ConvertErrorFmt(@SInvalidInteger, [S]); >> ну вот сам же видишь, шо не одно и то же! >> можешь сравнить тики, ежели очень надо :-) VA> Не, ну ясен перец, что будет меньше на вызов процедуры и на if!.. ;))) VA> А если вообще заменить на асмовую вставку?.. %))) Взглядом конвертить надо. Силом мысли! ЗЫ: В самом деле, прекращайте юникодом хулиганить. -- With best regards, Alex Cherednichenko.
Re: ""FIBPlus IBX DBExpress - " " ""
"Alex Cherednichenko" <[EMAIL PROTECTED]> wrote in message news:[EMAIL PROTECTED] > ЗЫ: В самом деле, прекращайте юникодом хулиганить. Да я изо всех сил выставляю palin-text и KOI8-R!.. :( Потому буковки в сабже и пропали... ;) -- [http://bakh.spb.ru] [email:bob#bakh.spb.ru] [icq:1608235] --~--~-~--~~~---~--~~ -~--~~~~--~~--~--~---
Re: ""FIBPlus IBX DBExpress - " " ""
Hello, Vladimir A.Bakhvaloff! You wrote on Thu, 25 May 2006 13:19:18 +0400: VA> Не, ну ясен перец, что будет меньше на вызов процедуры и на VA> if!.. ;))) на передачу параметров и возврат значения, и корректировку счётчика строки. ты посмотри шо за код в стртуинт генерится! выигрыш на строке из одно символа будет с три раза, из 10 символов - в полтора :-) VA> А если вообще заменить на асмовую вставку?.. %))) а val и есть она по сути Фёдоров Евгений. ЗАО "Трест-М". Екатеринбург. --~--~-~--~~~---~--~~ -~--~~~~--~~--~--~---