Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.09.22;
Скачать: CL | DM;

Вниз

SQL   Найти похожие ветки 

 
Vitaly   (2003-08-29 19:17) [0]

Как можно выбрать все записи за заданный год, полугодие, квартал.
Может вопрос и не сложный но я просто недавно познакомился с DELPHI.
Заранее большое спасибо!


 
GRAND ©   (2003-08-29 19:29) [1]

Компонент TADOQuery, в нем SQL:

SELECT * FROM TABLE1
WHERE (DATE_FIELD BETWEEN :DATE1 AND :DATE2)

В коде в нужный момент:

With ADOQuery1 Do
Begin
Close;
ParamByName("DATE1").AsString:=Date_Variable_1;
ParamByName("DATE2").AsString:=Date_Variable_2;
Open
End;


 
GRAND ©   (2003-08-29 19:31) [2]

Компонент TADOQuery, в нем SQL:

SELECT * FROM TABLE1
WHERE (DATE_FIELD BETWEEN :DATE1 AND :DATE2)

В коде в нужный момент:

With ADOQuery1 Do
Begin
Close;
ParamByName("DATE1").AsString:=DateToStr(Date_Variable_1);
ParamByName("DATE2").AsString:=DateToStr(Date_Variable_2);
Open
End;


 
Vitaly   (2003-08-29 19:48) [3]

У меня написано так и это работает.
DataModule2.FindQuery.SQL.Clear;
DataModule2.FindQuery.SQL.Add("Select * from Spravka, Dannie");
DataModule2.FindQuery.SQL.Add("where Name Like :AGRS1");
DataModule2.FindQuery.SQL.Add("and Date between :Date1 and :Date2");
DataModule2.FindQuery.SQL.Add("AND Spravka.Key=dannie.LinkKey;");
DataModule2.FindQuery.Active:=False;
DataModule2.FindQuery.Parameters.ParamByName("AGRS1").Value:=NAGRS.Tex t;
DataModule2.FindQuery.Parameters.ParamByName("Date1").Value:=ViborData .Text;
DataModule2.FindQuery.Parameters.ParamByName("Date2").Value:=ViborData 1.Text;
Но.. мне нужно чтобы по нажатию кнопки сразу выводились данные за год выбранный пользователем.


 
GRAND ©   (2003-08-29 19:57) [4]

Vitaly (29.08.03 19:48) [3]:
Я же тебе примерный обработчик написал. Вот он-то пускай и срабатывает по нажатию кнопки. Смысл в том, что надо сначала закрыть набор, запулять все необходимые параметры и заново открыть. А уж как разрулить даты - ну поделай стандартные кнопы там типа "1 квартал", "2 квартал" и т.д...


 
Vitaly   (2003-08-29 20:04) [5]

А понял !!! Спасибо большое.



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

Текущий архив: 2003.09.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.025 c
8-71758
Renul
2003-05-24 11:46
2003.09.22
Удаление рисунка


3-71545
AlexWeb
2003-08-27 13:11
2003.09.22
Как обновить данные в TIBQuery или TIBDataSet?


14-71926
Alice
2003-09-03 00:13
2003.09.22
Как вернуть винт ???


14-71868
Прохожий
2003-08-28 11:06
2003.09.22
SmtpCli из пакета ISC меня уже достал!!!


1-71668
Федор
2003-09-11 18:45
2003.09.22
Пара вопросов по кнопкам...