Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Не срабатывает условие / 6 сообщений из 6, страница 1 из 1
26.01.2019, 14:16
    #39765259
Vizit0r
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не срабатывает условие
Delphi Seattle

есть проверка

if ValidObject(CurrContext) and ValidObject(CurrContext.Data) and (TScriptData(CurrContext.Data).EventProcList[EventName] = true) then

и, несмотря на то, что в последнем массиве все False, и соответственно одно из условий False (что видно на скрине) - оно заходит внутрь блока.

Уже вон и принудительно на True проверяю, неважно.

P.S.Evauate\Modify по строке ValidObject(CurrContext) and ValidObject(CurrContext.Data) and (TScriptData(CurrContext.Data).EventProcList[EventName] = true) выдает False.


Пересобирал проект, не помогло. Что я делаю не так?
...
Рейтинг: 0 / 0
26.01.2019, 14:28
    #39765263
Dimitry Sibiryakov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не срабатывает условие
Vizit0rЧто я делаю не так?

Читая букварь ты явно пропустил главу про приоритеты операций в выражениях. Сюрприз, но у
and он выше, чем у =.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
26.01.2019, 14:29
    #39765265
Dimitry Sibiryakov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не срабатывает условие
А, извини, это у меня плохо с подсчётом скобок.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
26.01.2019, 14:59
    #39765270
Vizit0r
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не срабатывает условие
Код: pascal
1.
if ValidObject(CurrContext) and ValidObject(CurrContext.Data) and TScriptData(CurrContext.Data).EventProcList[EventName] then



полным выражением, без дефайнов - работает правильно.
Буду считать, что это баг сиээтла.

Через несколько дней поставлю Рио и проверю, как там будет работать.

P.S. Если что - раньше EventProcList был массивом строк, а не Boolean. И проверка на непустую строку отрабатывала правильно, а после перехода на Boolean начались такие карусели.
...
Рейтинг: 0 / 0
26.01.2019, 15:15
    #39765274
Kazantsev Alexey
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не срабатывает условие
Vizit0r,

Точка с запятой после {$ENDIF}
...
Рейтинг: 0 / 0
26.01.2019, 15:21
    #39765275
Vizit0r
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не срабатывает условие
баааалин...вот это да.
Спасибо.
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Не срабатывает условие / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]