ورود

View Full Version : مبتدی: اشكال در مورد رمز برروي فرم



masoud1345
چهارشنبه 26 تیر 1392, 09:16 صبح
دوستان دستورات زير چرا خطا ميده CD f:\man
USE pass
LOCATE FOR UPPER(pass.userid) = UPPER(ALLTRIM(THISFORM.txtUserName.Value)) .AND. ALLTRIM(password) = ALLTRIM(THISFORM.txtPassword.Value)
IF FOUND()
SET SYSMENU TO rtlj
CD f:\man
dO menu1.mpr
CLEAR eVENTS
ELSE
WAIT WINDOW "يافت نشد " TIMEOUT 1.5

THISFORM.txtUserName.Value = ""
THISFORM.txtPassword.Value = ""
THISFORM.txtUserName.SetFocus
ENDIF

gh_khajehzade
چهارشنبه 26 تیر 1392, 09:23 صبح
چه پيام خطايي ميده؟

masoud1345
چهارشنبه 26 تیر 1392, 10:23 صبح
خطاي fundtion argument value,type,or count is invalid

masoud1345
چهارشنبه 26 تیر 1392, 10:34 صبح
دوست عزيز اقاي خواجه زاده شما به سوالات اين حقير زياد جواب ميدهيد لازم ديدم كه علوه بر زدن دكمه تشكر شخصا نيز از شما تشكر بنمايم اميدوارم از اطاعات شما هميشه بهره من شويم ضمنا جواب سوال خود را پيدا كردم يك از فيلدها بايستي كراتر ميبود كه اشتباه نامريك بود

gh_khajehzade
پنج شنبه 27 تیر 1392, 10:55 صبح
خواهش ميكنم دوست عزيز.

masoud1345
شنبه 29 تیر 1392, 10:05 صبح
دوستان من دستورات زير را در prg برنامه ودر فرم خود گذاشته ام حال ميخواهم يك رمز براي برنامه خود درست كنم هر كار ميكنم يك ايرادي دارد لطفا يك رمز ساده با يك تكس هم كه باشد كافي است اگر محبت كنيد دستورات ان را بنويسد وبگوييد كجاي فرم اين دستورات را بنويسم لطفا توضيحات كامل بدهيد CD f:\man
DO FORM man.scx
READ EVENTS
در فرم هم دستورات زير


SET SYSMENU TO rtlj
DO menu1.mpr
CLEAR EVENTS

masoud1345
یک شنبه 30 تیر 1392, 07:41 صبح
كس از دوستان عزيز جواب بنده را بدهد

gh_khajehzade
دوشنبه 31 تیر 1392, 08:27 صبح
يك نگاه به مثال بنداز اميدوارم مفيد باشه:

masoud1345
دوشنبه 31 تیر 1392, 09:32 صبح
دوست عزيز بسيار عالي بود هرچند شما با ورژن بالا نوشته ايد وبنده مبتدي هستم لطفا بفرماييد چگونه اين فرم ها را اجرا كنم چون من هر فرمي را اجرا ميكنم خطا ميدهد

gh_khajehzade
دوشنبه 31 تیر 1392, 11:45 صبح
-ابتدا پوشه management رو تو درايو c كپي كن.-در پنجره فرمان فاكس ابتدا set default to c:\management و سپس do prre . -فقط براي مشاهده نحوه استفاده از فرم پسورد ميباشدپس در منوي ظاهر شده فقط خروج كار ميكند.

masoud1345
چهارشنبه 02 مرداد 1392, 09:06 صبح
دوست عزيز خيلي از برنامه شما استفاده وتجربه زيادي كسب نمودم لطفا اگر ميشود بفرماييد خطاي زير را چگونه برطرف كنم لطفا به زبان ساده ودقيق جواب بدهيد خي
لي متشكرم property backcolor is not found

gh_khajehzade
چهارشنبه 02 مرداد 1392, 13:43 عصر
بر اساس help فاكس يكي از احتمالات اينه كه خاصيت backcolor رو براي يكي از اشيا (مثلا commandbutton )درست تعريف نكردي.يا اصلا اين خاصيت براي شي مورد نظر وجود ندارد.در چه مرحله اي error داري مثلا با اجراي يك فرم يا كليك روي كنترل خاص؟

masoud1345
پنج شنبه 03 مرداد 1392, 07:23 صبح
در متد mousenter ويا mousleave دستورات به شرح ذيل LPARAMETERS nButton, nShift, nXCoord, nYCoord
thisform.command1.Picture='f:\man\10.bmp'
thisform.command1.Caption='انصراف'
thisform.command1.Width=84
thisform.command1.Height=39
thisform.command1.BackColor=1673514

gh_khajehzade
پنج شنبه 03 مرداد 1392, 09:51 صبح
ظاهرا همه چيز درسته.اگه بابردن ماوس روي commandbutton همچين error ميده نميدونم چرا! شايد error براي يك شي ديگه باشه.