|
|
|
Как сравнить текущий текст Adoquery1.SQL.Text со строкой.
|
|||
|---|---|---|---|
|
#18+
Например в Delphi я хочу проверить совпадает ли сейчас текст в запросе с неким заданным заранее: ADOQuery1.SQLText:= 'Select * from Main_tab'; if (ADOQuery1.SQL.Text='Select * from Main_tab') Then Showmessage ('ДА!!!') ELSE Showmessage('НЕТ!!!'); Так вот всегда вылетает "Нет!!!". Я уже как только не баловался с нижним и верхним шрифтом и прочее. пс Зачем собственно танцы с бубном. Есть у меня штук 15 чек боксов и в зависимости от чекнутого - добавляю очередную строку в условие поиска, так вот что бы определиться первая ли строка и надо ли воткнуть в запрос +' AND '+ я и хочу сравнить текущее состояние строки запроса. т.е. 1 строка по умолчанию AdoQuery1.SQL.Text:='SELECT * FROM Main_tab WHERE '; и за тем проверка if (CheckBox3.Checked=true)then if(Adoquery1.SQL.Text<>'Select * From Main_tab Where ') then AdoQuery1.SQL.Add(' AND Otdelenie='''+DBLookupComboBox2.Text+'''') else AdoQuery1.SQL.Add(' Otdelenie='''+DBLookupComboBox2.Text+''''); ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.06.2013, 13:33:00 |
|
||
|
Как сравнить текущий текст Adoquery1.SQL.Text со строкой.
|
|||
|---|---|---|---|
|
#18+
Решено путем проверки if (Adoquery1.SQL.Count>1), т.е. если больше 1 строки то добавляю AND. И все таки интересно, почему сравнивая содержимое sql запроса со строкой никогда не происходит совпадения. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.06.2013, 14:03:23 |
|
||
|
Как сравнить текущий текст Adoquery1.SQL.Text со строкой.
|
|||
|---|---|---|---|
|
#18+
xavier_danЯ уже как только не баловался с нижним и верхним шрифтом и прочее.В "и прочее" входил перевод строки? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.06.2013, 14:10:01 |
|
||
|
Как сравнить текущий текст Adoquery1.SQL.Text со строкой.
|
|||
|---|---|---|---|
|
#18+
Нет. Скиньте ссылку о чем вообще речь?)) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.06.2013, 14:47:38 |
|
||
|
Как сравнить текущий текст Adoquery1.SQL.Text со строкой.
|
|||
|---|---|---|---|
|
#18+
Это не форум по дельфи, так что далее будет оффтоп: Вот тут xavier_danAdoQuery1.SQL.Add(' AND Otdelenie='''+DBLookupComboBox2.Text+''''), поскольку AdoQuery1.SQL ЕМНИП является stringlist-ом, добавляется строка . И опять же ЕМНИП в результате такого Код: sql 1. 2. 3. AdoQuery1.SQL.Text будет равен 'q1#10#13q2', а не 'q1q2'. Впрочем, с дельфи не работал уже много лет, так что могу и ошибаться. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 29.06.2013, 06:17:41 |
|
||
|
|

start [/forum/topic.php?fid=47&fpage=220&tid=1836531]: |
0ms |
get settings: |
7ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
28ms |
get topic data: |
6ms |
get forum data: |
2ms |
get page messages: |
32ms |
get tp. blocked users: |
1ms |
| others: | 204ms |
| total: | 293ms |

| 0 / 0 |
