Çalışma anında cxGrid de iki tarih arası filtreleme (kodla)

[mudipasa]

Bu İşlem İçin Forumu bayağı karıştırdım. Allah razı olsun çok şey yazmışlar ama parçalı bir şekilde. bende birleştirip ve kendime göre iki tarih arası yapıp sizlerle paylaşmak istedim. İyi çalışmalar.

öncelikle forma iki adet cxDateEdit nesnesi yerleştirin

procedure TForm1.Button1Click(Sender: TObject);
begin
if (cxDateEdit1.Text <> '') and (cxDateEdit2.Text <> '') then
begin
cxGrid1DBTableView1.DataController.Filter.Clear;
cxGrid1DBTableView1.DataController.Filter.Root.BoolOperatorKind := fboAnd;
cxGrid1DBTableView1.DataController.Filter.Root.AddItem(
cxGrid1DBTableView1TARIH,foGreaterEqual,
cxDateEdit1.Date,cxDateEdit1.Text);
cxGrid1DBTableView1.DataController.Filter.Root.AddItem(
cxGrid1DBTableView1TARIH,foLessEqual,cxDateEdit2.Date,cxDateEdit2.Text);
cxGrid1DBTableView1.DataController.Filter.Active := True;
end;
end;

[akuyumcu63]

çok sağol kardeş eline koluna sağlık;

end ELSE
cxGrid2DBTableView1.DataController.Filter.Active := FALSE;

yukarıdaki kodun sonuna bu kodu eklerseniz cxdateeditlerin içi boşalıncada filitre iptal olur.

artık benimde forma yavaş yavaş ufakta olsa katkılarımın zamanı geldi diye düşünüyorum. gerçi nekadar katkı sağlasakda hakını ödeyemeyiz.

[savasgti]

fboAnd ve foGreaterEqual da hata veriyor. kütüphanemi gerekli acaba.

[savasgti]

cxfilter kütüphanesi eklenmeli.