TabSheet

سلام
من یک PageControl دارم که شامل دو تا TabSheet است در این دو TabSheet دو تا دی بی گرید قرار داده ام که از یک دیتا ماژول اطلاعاتشان را نشان می دهند در این دو دی بی گرید ستونی بنام کارکرد قرار دارد که اطلاعاتش شامل 1 یا 2 است حال می خواهم وقتی که بر روی تب شیت یک کلیک می کنم فقط رکوردهایی که ستون کارکرد آن یک است نمایش داده شود و وقتی که بر روی ستون دوم کلیک می کنم فقط رکوردهایی که ستون کارکرد آن 2 است نمایش داده شود . لطفا کمکم کنید . متشکرم
:40::40::40::40::40::40::40::40::40::40::40::40::4 0::46::11:

با سلام. رويداد OnShow هر كدام از sheet ها را مديريت كنيد

یه چیزی شبیه این ؟

کد:

---

var
  T:string;
procedure Tinfovarud.TabSheet1Show(Sender: TObject);
begin
t:=inttostr(12);
DataModule13.ADOTable1.Filtered:=false;
DataModule13.ADOTable1.Filter:='mkard like'+t+'';
DataModule13.ADOTable1.Filtered:=true;
end;

---

ولی باز هم خطا میده
:40::40::40::40::40::40::40::40::40::40::40::40::4 0::11::46:

پيغام خطا؟

مشکل حل شد بعد از like باید یک فاصله می گذاشتم که فراموش کرده بودم با اصلاح آن برنامه نیز جواب داد متشکرم
:40::40::40::40::40::40::40::40::40::40::40::40::4 0::40::11::46: