Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Проверка строковой переменной [D6, WinXP]

webpauk © (2006-08-16 18:44:00)
Как проверить является ли она числом (Integer)?

Германн (2006-08-17 03:00:00) [1]

> Ketmar © (17.08.06 02:50) [12]
>
> > [11] Германн © (17.08.06 02:34)
> ну так не раскрывать же его сразу и всем?
>

Так зачем тогда "раскрыл сразу и всем" в [10] ? :-) Мог бы завуалировать! :-)

Ketmar (2006-08-17 02:50:00) [2]
> [11] Германн © (17.08.06 02:34)
ну так не раскрывать же его сразу и всем?

Германн (2006-08-17 02:34:00) [3]

> Ketmar © (17.08.06 02:26) [10]
>
> > [9] Германн © (17.08.06 01:58)
> хобби такое. %-)

А чего тогда врал, что хобби n/a?

Ketmar (2006-08-17 02:26:00) [4]
> [9] Германн © (17.08.06 01:58)
хобби такое. %-)

Германн (2006-08-17 01:58:00) [5]

> Ketmar © (17.08.06 01:18) [8]
>
> > [7] Германн © (17.08.06 01:05)
> не процент, а доллар. и не "классический", а "сишный". и
> не "x" а "0x". %-)

Уел ты меня, причём по полной! :-)

Ketmar (2006-08-17 01:18:00) [6]
> [7] Германн © (17.08.06 01:05)
не процент, а доллар. и не "классический", а "сишный". и не "x" а "0x". %-)
компилятор Delphi такого не понимает. а вот процедура Val() -- ещё как. нелогично.

Германн (2006-08-17 01:05:00) [7]

> Ketmar © (16.08.06 22:13) [6]

Вариант с "х" - классический. Процент для обозначения HEX - числа ввёл борланд или иже с ними. АП подскажет, если сочтёт необходимым.

Ketmar (2006-08-16 22:13:00) [8]
> [5] Чапаев © (16.08.06 22:04)
ха. сам долго не знал. когда-то надолкнулся на то, что понимает "xa" как число. долго искал ошибку в своём коде (ну не выспался я, не догадался сопоставить 10 и "xa" %-). потом догадался, проверил по исходникам. таки да, зараза, таки принимает. пришлось дополнительно вводить ручную проверку первого символа. %-)

Чапаев (2006-08-16 22:04:00) [9]
> понимает 16-ричные числа, которые начинаются с "$" и "x".

Ишь ты... Про "х" не знал.

Ketmar (2006-08-16 21:53:00) [10]
function IsIntNumber (const s: string): Boolean; var e: Integer; i: Integer; begin Val(s, i, e); result := (e = 0); end;

дополнительно понимает 16-ричные числа, которые начинаются с "$" и "x".

как сделать проверку на дробные -- думайте сами.

Dmitrij_K (2006-08-16 19:08:00) [11]

> uses SysUtils!!!не надо

Ненадо, так не используй

webpauk (2006-08-16 19:05:00) [12]

> Dmitrij_K (16.08.06 18:57) [1]

uses SysUtils!!!
не надо

Dmitrij_K (2006-08-16 18:57:00) [13]
http://forum.vingrad.ru/index.php?showtopic=103703
http://forum.vingrad.ru/index.php?showtopic=105712

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »