یک فیلتر ترکیبی برای بانکهای اطلاعاتی

[a_b_toops]

یک فیلتر ترکیبی برای بانکهای اطلاعاتی با اضافه کردن به dbgrid اتوماتیک به فیلتر اضافه می شود

[hex161]

سلام .
آیا میشه از این فیلتر توی دیتابیس DBISAM استفاده کرد؟
من خیلی سعی کردم ولی نشد.
راه دیگه ای سراغ ندارید ؟
کدهای این فیلتر هم خیلی شلوغ هست. نمیشه این سورس رو ساده تر کرد؟
با تشکر فراوان.

[hex161]

سلام.
من با این قسمت کدتون مشکل دارم :



filtr1:= TADODataSet(TDBGrid(TForm(FindGlobalComponent(for1 )).FindComponent(dbg)).DataSource.DataSet).Filter;
TADODataSet(TDBGrid(TForm(FindGlobalComponent(for1 )).FindComponent(dbg)).DataSource.DataSet).Filtere d:=true;
DBGrid1.DataSource:=TDBGrid(TForm(FindGlobalCompon ent(for1)).FindComponent(dbg)).DataSource;
DBGrid1.Columns:=TDBGrid(TForm(FindGlobalComponent (for1)).FindComponent(dbg)).Columns;

دیتا بیس من dbisam هست حالا بجای TADODataSet تو dbisam چی بزارم ؟
ممنون.