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

Вниз

Проверка выражения на true/false НУЖНА ПОМОЩЬ!!!   Найти похожие ветки 

 
Lotus   (2002-01-05 15:27) [0]

Подскажите плз. как проверить на истину логическое выражение в Ansi-строке. Например: есть Ansi-строка: " 2>1 AND 10>4", нужно
чтобы программа определила, что это выражение TRUE.


 
Андрей Сенченко   (2002-01-05 15:32) [1]

pos("",AnsiStroka), pos("<",AnsiStroka), pos("OR",AnsiStroka), ...
Короче сам для себя определяешь правила записи и возможные варианты этой самой AnsiStroka и сам для себя их потихонечку кропотлтво описываешь ...


 
Lotus   (2002-01-05 15:50) [2]

Нет POS не подходит, т.к. числовые выражения могут быть совершенно разной длинны напр. "1200<1" тут уже получится нужно определять что stroka.pos("<") это 5??
Я пишу программу, в которой пользователь сам строит логические условия (как в примере) и вводит их напр. в TEdit, а комп. их обрабатывает на истинность.


 
Lotus   (2002-01-05 15:59) [3]

Другими словами как мне перелопатить и потом подставить эту строку в условие типа:
if !stroka { ..... };
где stroka это то, что см. выше.


 
Андрей Сенченко   (2002-01-05 15:59) [4]

Наверное не совсем догоняешь мысли ... или я хреново толкую
Есть строка вида :
str := "12536.37>12536.38 AND 15=14"

1. Проверяешь нет ли пробела в начале
2. Вычленяешь первое условие ( т.е ищешь первый пробел )
Substr1 := copy(st,pos(" ",st),0)
3. Определяешь символ отношения
pos(">",st)
4. Отрезаешь строки ДО и ПОСЛЕ символа отношения, ковертишь в число и сравниваешь ...
и так далее.

....
Замотаешься конечно перебирать ВСЕ варианты, но можно облегчить себе жизнь предварительным проходом по стороке, убоем в ней всех пробелов, вычислением в ней всех логических и математических операторов и их позиций, а потом просто разобрать это по собственным правилам.


 
Андрей Сенченко   (2002-01-05 16:01) [5]

... а объяснить компилятору, что вот в этой переменной нужно будет когда-то потом найти логическое условие ... не знаю. Врядли.



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

Форум: "Основная";
Текущий архив: 2002.01.24;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.004 c
7-75693
BoBaH
2001-10-11 13:20
2002.01.24
TRegistry


6-75645
Diamond Sirus Ringer
2001-10-29 15:06
2002.01.24
Проблемы клиент-сервеных приложений на основе сокетов


14-75655
zero
2001-11-28 14:50
2002.01.24
SMS


1-75619
Starkom
2002-01-08 11:21
2002.01.24
Не могу инсталлировать Delphi5 под WinXP


3-75484
Delirium
2001-12-19 16:44
2002.01.24
RecordSet - > Paradox





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский