مشکل با DBCheckbox

[babak_delphi]

سلام
من مشکل عجیبی با DBCheckBox در دلفی 7 پیدا کردم
من روی فرمم 3 تا DBChechbox قرار دادم که هر کدوم بوسیله ADOTable به یک فیلد از نوع bit در پایگاه داده ms sqlserver 2005 وصل شده اند
من میخوام با فشاردادن هرکدام از کلیدهای 1و2و3 به ترتیب یکی از این dbcheckbox ها تیک بخورند


if (Key = VK_NUMPAD1) then
DBCheckBox1.Checked := not DBCheckBox1.Checked;


من قبا از این کار ابتدا ADOTable را Append میکنم
بعد هم Post می کنم
مشکل ایجاست که وقتی با کد ، DBCheckBox رو تیک میزنم در Database وارد نمیشه اما وقتی روش کلیک میکنم درست عمل میکنه
چطور میتونم این مشکل رو حل کنم؟

[mehdimdp]

شما در خط دوم به جای کد خودتون از کد زیر استفاده کن:


mytbl.fielbynmame('chek1').value:= not mytbl.fieldbyname('chek1').value

اینطوری 100% کارت را میفته