Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2004.03.14;
Скачать: [xml.tar.bz2];

Вниз

Как грамотно преобразовать string в integer   Найти похожие ветки 

 
Денисыч   (2004-02-17 00:52) [0]

Т.е можно написать
try
s := strtoint( i );
except поймал если че - то не так ( не число )
но это несерьезно. Перебор строки IN 0..9 тоже.

И как проверять введено ли в EDIT число или нет без обработки исключений.


 
Exciter   (2004-02-17 02:02) [1]

Запрети ввод в строку всех символов кроме чисел. И трай вообше не нужен будет. Если тока юзер из буфера туда мусор не воткнет.


 
Maxud   (2004-02-17 07:52) [2]

var v, code: integer;
begin
InpStr := "text";
Val(InpStr, v, code);
if code <> 0 then // ругаемся
утвж


 
paul_k   (2004-02-17 09:45) [3]

Converts a string that represents an integer (decimal or hex notation) to a number with Boolean success code.

Unit

SysUtils

Category

type conversion routines

Delphi syntax:

function TryStrToInt(const S: string; out Value: Integer): Boolean;

Description

TryStrToInt converts the string S, which represents an integer-type number in either decimal or hexadecimal notation, into a number, which is assigned to Value. If S does not represent a valid number, TryStrToInt returns false; otherwise TryStrToInt returns true.


 
Desdechado   (2004-02-17 11:04) [4]

StrToIntDef - в случае ошибки возвращает указанное значение по умолчанию


 
Жук   (2004-02-17 11:54) [5]

А если вставка из буфера шифт+инсертом ?


 
Fay   (2004-02-17 12:49) [6]

2Жук © (17.02.04 11:54) [5]
OnExit
2Maxud © (17.02.04 07:52) [2]
Val глотает значения типа "2147483648". А не должен.


 
Draught   (2004-02-17 13:17) [7]

попробуй TryStrToInt(<string>,<integer>)


 
Anatoly Podgoretsky   (2004-02-17 15:02) [8]

Fay © (17.02.04 12:49) [6]
Это езще почему, данное число есть нормальный integer-type, параметр V нетипизированный, твоя задача обеспечить, что бы в него могло поместиться это число.



Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2004.03.14;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.011 c
8-43686
UnDISCOvery
2003-11-06 15:15
2004.03.14
DirectSound. Как записать многоканальный звук ?


1-43435
DVM
2004-03-03 19:57
2004.03.14
Алгоритм Антиалиазинга


1-43559
Aleksandr
2004-02-27 17:47
2004.03.14
Как программно запустить сервисное приложение?


3-43375
Санек
2004-02-13 18:16
2004.03.14
Теория коннекта


3-43303
dendy
2004-02-12 00:12
2004.03.14
SQL запрос, заглавные и прописные





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский