مشکل در فیلتر

[me1364]

سلام به همه دوستان.
من یه برنامه تاکسی سرویس می نویسم که در قسمتی از آن کلیه سرویس هایی را که برنگشته اند نمایش میدهم برای برگشت یک فیلد دیتا بیس را مقدار 1 بهش میدم. من در فرم شو نوشتم که هر کدام مقدارشون 0 هست نمایش بده تا اینجا همه چیز درست کار میکنه اما به محض اینه داده آخر DBGrid را فیلتر می کنم مقدار 1 میدم پیغام خطا میده به نظر شما من برای مشکلم چه کاری انجام دهم؟

[Hsimple11]

من یه برنامه تاکسی سرویس می نویسم که در قسمتی از آن کلیه سرویس هایی را که برنگشته اند نمایش میدهم برای برگشت یک فیلد دیتا بیس را مقدار 1 بهش میدم. من در فرم شو نوشتم که هر کدام مقدارشون 0 هست نمایش بده تا اینجا همه چیز درست کار میکنه اما به محض اینه داده آخر DBGrid را فیلتر می کنم مقدار 1 میدم پیغام خطا میده به نظر شما من برای مشکلم چه کاری انجام دهم؟

از چه نوع پایگاه داده ای استفاده میکنید؟ چگونه فیلتر کرده اید؟ دستورهایتان را بنویسید.

[me1364]

از چه نوع پایگاه داده ای استفاده میکنید؟ چگونه فیلتر کرده اید؟ دستورهایتان را بنویسید.
Sql Server 2000
کد فرم شو

Dm.TService.Filtered:= false;
Dm.TService.Filter := 'R =' + QuotedStr('0');
Dm.TService.Filtered := true;
کد button

if MessageDlg('ÂíÇ ãØãÆä Èå ÈѐÔÊ Çíä ÓÑæíÓ ãí ÈÇÔíÏ', mtInformation,[mbyes,mbno],0) = mryes then
begin
Dm.TService.Edit;
Dm.TService['R'] := 1;
Dm.TService.Post;
end;

[Hsimple11]

نوع فیلد R را عددی تعریف کنید :

With Dm.TService Do
Begin
Edit;
FieldByName ('R').AsInteger := 1;
Post;
End;

در ضمن توجه داشته باشید که رکورد مورد نظر قبل از کلیک بر روی دکمه فعال باشد.

موفق باشید...