Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.12.2008, 21:46   #11
sw47
Пользователь
 
Регистрация: 03.12.2008
Сообщений: 18
По умолчанию

begin
if dblookupcombobox2.text<>'' then begin
datamodule2.query1.filter:=('Avtor= '''+dblookupcombobox2.Text+'''') and ('Izdatelstvo='''+dblookupcombobox3 .Text+'''');
datamodule2.query1.filtered:=true;
end;

я уже пробовал. он говорит что Operator not applicable to this operand type и выделяет точку запятой после скобок.
sw47 вне форума Ответить с цитированием
Старый 07.12.2008, 21:49   #12
_Engine_
Форумчанин
 
Регистрация: 29.06.2008
Сообщений: 603
По умолчанию

Правильно выдает. AND надо в строке условия писать.
_Engine_ вне форума Ответить с цитированием
Старый 07.12.2008, 21:54   #13
sw47
Пользователь
 
Регистрация: 03.12.2008
Сообщений: 18
По умолчанию

if dblookupcombobox2.text and dblookupcombobox3.text <>'' then begin
так вот?

в методичке пример такой:
table1.filter:='(staj>=5) and(oklad<400)';
table1.filtered:=true;

p.s. я делфи позавчера установил.
sw47 вне форума Ответить с цитированием
Старый 07.12.2008, 22:00   #14
sw47
Пользователь
 
Регистрация: 03.12.2008
Сообщений: 18
По умолчанию

begin
datamodule2.query1.filter:='(Avtor= '''+dblookupcombobox2.Text+''') and (Izdatelstvo='''+dblookupcombobox3. Text+''')';
datamodule2.query1.filtered:=true;
end;

Починил. вся фишка в ' этих штуках.
sw47 вне форума Ответить с цитированием
Старый 07.12.2008, 22:10   #15
sw47
Пользователь
 
Регистрация: 03.12.2008
Сообщений: 18
По умолчанию

как сделать экзешник программы?
sw47 вне форума Ответить с цитированием
Старый 08.12.2008, 09:59   #16
_Engine_
Форумчанин
 
Регистрация: 29.06.2008
Сообщений: 603
По умолчанию

Ctrl + F9 спасет отца русской демократии
_Engine_ вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Поиск в базе данных St-Dyx Microsoft Office Excel 8 19.10.2008 12:13
Поиск данных aston Microsoft Office Excel 9 04.04.2008 16:30
МАКРОС!ПОИСК ДАННЫХ. HELP! jungo Microsoft Office Excel 8 02.04.2008 10:50
Поиск по базе данных ERASERROR БД в Delphi 4 14.03.2008 16:34