Search options (Page 1 of 8)

Приветствую.

Извиняюсь за задержку с ответом. Вопрос все еще актуален для вас?

дополнил

procedure Form1_bLineUpdate_OnClick (Sender: string; var Cancel: boolean);
var
    Results: TDataSet;
    DateValue: Double;
    QtyValue: string;

    sSQL, s: string;
    sCountry, sRegion, sCity, sDateFrom, sDateTo: string;
begin
    ChartBar.Series[0].Clear;

    sCountry := IntToStr(Form1.cbCountry.dbItemID);
    sRegion := IntToStr(Form1.cbRegion.dbItemID);
    sCity := IntToStr(Form1.cbCity.dbItemID);
    sDateFrom := Form1.DateTimePicker1.sqlDate;
    sDateTo   := Form1.DateTimePicker2.sqlDate;

    sSQL :=
    'SELECT '+
    '    Country.country, '+
    '    COUNT(Country.id) as qty'+

    '    FROM MyFavoriteCities '+

    '    LEFT OUTER JOIN City ON City.id=MyFavoriteCities.id_City '+
    '    LEFT OUTER JOIN Region ON Region.id=City.id_Region '+
    '    LEFT OUTER JOIN Country ON Country.id=Region.id_Country '+

    'WHERE '+
    '(CASE WHEN '+sCountry+'=-1 THEN 1=1 ELSE Country.id='+sCountry+' END) AND '+
    '(CASE WHEN '+sRegion+'=-1 THEN 1=1 ELSE Region.id='+sRegion+' END) AND '+
    '(CASE WHEN '+sCity+'=-1 THEN 1=1 ELSE City.id='+sCity+' END) AND' +
    '(CASE WHEN '+sDateFrom+' IS NULL THEN 1=1 ELSE MyFavoriteCities."Date">=date('+sDateFrom+') END) AND' +
    '(CASE WHEN '+sDateTo+' IS NULL THEN 1=1 ELSE MyFavoriteCities."Date"<=date('+sDateTo+') END) ' +
    'GROUP BY Country.id ';

    SQLQuery(sSQL, Results);

    while not Results.Eof do
    begin
        s :=  Results.FieldByName('country').asString ;
        QtyValue := Results.FieldByName('qty').asString;

        if ValidInt(QtyValue) then ChartBar.Series[0].AddY(StrToInt(QtyValue), s );
        Results.Next;
    end;


end;

DriveSoft wrote:

Игоревич wrote:

Есть идин момент. При добавлении (удалении)записи график обновляется. Но если я в поиске например хочу посмотреть за 2 дня выставляю поиском показать записи с такого-то по такое. График не обновляется.

Необходимо чтобы компонент для даты также учавствовал в SQL запросе.

Пример подправите буду очень блогодарен. СПС

Игоревич wrote:

Есть идин момент. При добавлении (удалении)записи график обновляется. Но если я в поиске например хочу посмотреть за 2 дня выставляю поиском показать записи с такого-то по такое. График не обновляется.

Необходимо чтобы компонент для даты также учавствовал в SQL запросе.