Printable View
دوسان من وقتي يك رديف از اطلاعات گريد خود را انتخاب ميكنم وسپس دكمه حذف اطلاعات را ميزنم ميخواهم همان رديف خذف شود ولي اطلاعات حذف ميشود ولي گريد من تمام سفيد ميشود دستورات به شرح زير است SELECT 1
USE mojodi EXCLUSIVE
DELETE FOR RECNO()=RE_
SELECT 1
PACK
thisform.grid1.Refresh
SELECT 1
یک راه حل:
1-در Datainvironment فرم با راست کلیک روی جدول و انتخاب properties خاصیت Exclusive رو برابر .T. قرار بده.
2-در دکمه Delete مانند مثال زیر عمل کن:
copy to c:\ma2 for recno()<>4
zap
append from c:\ma2
go top
thisform.grid1.Refresh
کلا کنترل گرید با تغییر RecordSource و همچنین حذف رکوردها به این وضعیت دچار می شود بهترین روش قبل از اعمال چنین دستوراتی بر روی گرید کافی است دستور ''= RecoredSource را قبل از دستورات خود و بعد از اعمال دستورات می توانید مجددا خاصیت RecordSource را مقداردهی کنید در ضمن با این روش می توانید تمامی متدهایی که در کنترل گریدتون نوشته اید را نیز حفظ نمایید مناسب برای مواقعی که می خواهید گریدتون به صورت دینامیک باشه
با این روش, بعد از مقدار دهی مجدد Recordsource, تمام فیلدها در گرید دیده میشوندوفرم اولیه گرید به هم میریزددر اینجا کاملا مشکل و راه حلشو توضیح داده:
http://weblogs.foxite.com/andykramek...rve-your-grid/
یه راه ساده اینه که با Set Filter بانکت رو بر اساس یکی از فیلدها (مثلا Code) فیلتر کنی. (Code>0) و موقع Delete مقدار Code رو برابر صفر قرار بدی و گرید رو رفرش کنی. موقع بستن فرم هم کدهایی که برابر صفر است پاک بشه.
با سلامنقل قول:
نوشته شده توسط farhad_shiri_ex
من در متد کلیک یک سلول از گرید قبل از دستور فیلتر recordsource رو نگه میدارم و بعد از فیلتر دوباره مقدار دهی میکنم ولی باز وقتی refresh میکنم صفحه گرید سفید میشه! مشکل کجاست؟