PDA

View Full Version : مبتدی: یه مشکل عجیب و جالب



Emir New
یک شنبه 28 فروردین 1390, 14:18 عصر
با سلام خدمت اساتید
من یه فرمی دارم که در ان از دستور SET FILTER استفاده کردم
نکته اینجا هست که در خروجی برنامه این دستور اجرا میشه ولی درست کار نمی کنه در سورس برنامه درست کار می کنه
و جالب تر از اون اینجا هست که در خروجی برنامه اگر تنظیمات سیستم رو بردارم این دستور درست کار می کنه

این تنظیمات سیستمی هست که اعمال کردم
_screen.Closable = .F.
_screen.Caption = ''
_screen.Height =SYSMETRIC(2)
_screen.Width = SYSMETRIC(1)
SET AUTOSAVE ON
SET BELL OFF
SET BLINK OFF
SET CLOCK STATUS
SET COMPATIBLE TO FOXP
SET CONFIRM ON
SET DELETED ON
SET EXACT ON
SET ESCAPE OFF
SET STATUS BAR Off
SET SAFETY OFF
SET STATUS OFF
SET RESOURCE OFF
SET TALK OFF
SET EXCLUSIVE ON
set status bar off
*SET SYSMENU TO RTLJUST
SET SYSMENU OFF


و این هم دستور که استفاده کردم
SET FILTER TO (date=LEFT(_date,7))
متغیر _date پابلیک هست
لطفا بگید مشکل من کجا هست

rahro
دوشنبه 29 فروردین 1390, 06:56 صبح
سلام
دستور رو با اين نمونه تست کن.

SET FILTER TO ALLTRIM(date)==LEFT(ALLTRIM(_date),7)

binyaz2003
دوشنبه 29 فروردین 1390, 08:12 صبح
لطفا عنوان مناسب براي موضوع انتخاب و آن را تغيير دهيد.
در ضمن آيا چک کرده ايد که Set("Exact") در حالت اجرا در چه وضعي قرار دارد؟
در حالت عادي در ويژوال فاکس پرو اين تنظيم خاموش است و شما آن را روشن کرده ايد که باعث ميشود تا شرط خواسته شده دقيقا اعمال شود.