|
#1
|
|||
|
|||
радиокнопки
Люди подскажите, пожалуйста, что не так. При выборе 1 радиокнопки надо вывести список оборудования у которого не указаны даты окончания, при 2 радиокнопке только список оборуд. у которого дата окончания есть16.jpg
|
#2
|
||||
|
||||
Попробуй так
Код:
if not (datamodule4.query4.fieldbyname('Data_okon').value='') then Нет ничего не возможного. Вопрос только во времени... |
#3
|
|||
|
|||
не помогло
|
#4
|
||||
|
||||
Дай исходник исправлю и верну..
Нет ничего не возможного. Вопрос только во времени... |
#5
|
|||
|
|||
блин, что то немного в условии не так и всего то .. но вот что?
народ, посмотрите свежим взором, пожалуйста... |
#6
|
||||
|
||||
Само условие не правильное - пустоты проверяются так
Код:
if datamodule4.query4.fieldbyname('Data_okon').isnull then Нет ничего не возможного. Вопрос только во времени... |
#7
|
|||
|
|||
Например, сесть на событие OnFilterRecord. И брать поле AsString, тримать его и сравнивать с пустой строкой.
А вообще, я бы сделал динамический запрос. Просто в зависимости от выбранной радиокнопки дописываешь в условие IS NULL или NOT IS NULL. |
#8
|
|||
|
|||
а можно как нибудь по подробнее? примерный текст набросайте, если не сложно
если имеете ввиду так Код:
if RadioGroup1.ItemIndex=0 then begin if Datamodule4.Query4.FieldByName('Data_okon').IsNull then Datamodule4.Query4.Filtered:=true; Form17.QuickRep1.Preview; end; if RadioGroup1.ItemIndex=1 then begin if not Datamodule4.Query4.FieldByName('Data_okon').IsNull then Datamodule4.Query4.Filtered:=true; Form18.QuickRep1.Preview; end; то не вышло Последний раз редактировалось Admin, 09.05.2011 в 19:55. |
#9
|
|||
|
|||
для первой кнопки работает!
Код:
if RadioGroup1.ItemIndex=0 then begin Datamodule4.Query4.Filter:='(Data_okon=null)'; Datamodule4.Query4.Filtered:=true; Form17.QuickRep1.Preview; end; но что делать со второй кнопкой? если писать Data_okon=not null то не воспринимает |
#10
|
|||
|
|||
а вот и для второй)))
Код:
if RadioGroup1.ItemIndex=1 then begin Datamodule4.Query4.Filter:='(Data_okon<>null)'; Datamodule4.Query4.Filtered:=true; Form18.QuickRep1.Preview; end; Спасибо всем кто помогал и навёл на верный ход мыслей |