Скачать: CL | DM;

Странный глюк Делфи6   Найти похожие ветки 

← →
Чапаев   (2007-10-24 12:30) [0]

Проверить символ на "цифру". Код, например, такой: if (ACode128[I] < "0") or (ACode128[I] > "9") then Exit;. ACode128[I] в дебагере равно "2", попадаем в Exit. Пробовал ACode128[I] in ["0".."9"] и Ord(ACode128[I]) - Ord("0") in [0..9] -- результат тот же?

Шо с этим чудом делать?

---

← →
Сергей М. ©   (2007-10-24 12:32) [1]

> ACode128[I] в дебагере равно "2",


А в ShowMessage(ACode128[I]) что видишь при этом ?

---

← →
Чапаев   (2007-10-24 12:38) [2]

> А в ShowMessage(ACode128[I]) что видишь при этом ? Всё правильно вижу.

В принципе, уже обошёл (введением промежуточной переменной), но глюк неприятный...

---

← →
Reindeer Moss Eater ©   (2007-10-24 12:39) [3]

if ("2" < "0") or ("2" > "9") then
 ShowMessage("ни хрена себе!")
else
 ShowMessage("Это был оптический обман");

---

← →
Leonid Troyanovsky ©   (2007-10-24 13:41) [4]

> Чапаев   (24.10.07 12:30)  

> Шо с этим чудом делать?

Декларацию ACode128 - в студию.

--
Regards, LVT.

---

← →
Dimaxx ©   (2007-10-25 01:19) [5]

Скорее всего I изначально равно 0, следовательно, вместо символа строки проверялась длина.

---

← →
Германн ©   (2007-10-25 01:29) [6]

> Leonid Troyanovsky ©   (24.10.07 13:41) [4]

...

> Декларацию ACode128 - в студию.

Присоединяюсь. Действительно интересно.
Кстати и сам код цикла тоже интересен.

---

← →
DrPass ©   (2007-10-25 01:54) [7]

> Dimaxx ©   (25.10.07 01:19) [5]
> Скорее всего I изначально равно 0, следовательно, вместо
> символа строки проверялась длина

Длина в нулевом символе строк не хранится. Это только в оставшихся в наследство от Турбо-Паскаля ShortString"ах

---

← →
Германн ©   (2007-10-25 02:01) [8]

> DrPass ©   (25.10.07 01:54) [7]
>
>

Но даже если использовались ShortString или опция {$H-} всё равно не понятны слова
> ACode128[I] в дебагере равно "2", попадаем в Exit.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c