آموزش: قفل کردن صفحه و اجرای دستورات [بایگانی]

R2du-soft

سه شنبه 10 مرداد 1391, 14:29 عصر

سلام
به کدی احتیاج دارم که بزارمش تو دکمم و وقتی روی دکمم کلیک کردم صفحه قفل بشه یعنی مشکی کم رنگ بشه و کاری نشه کرد ، بعد دستوراتی که تو دکمم هست اجرا بشه و سپس دوباره به حالت عادی برگرده صفحه.
میشه چنین کاری رو با ویژوال بیسیک انجام داد؟
ممنون میشم راهنمایییم کنید.

mohammadriano

سه شنبه 10 مرداد 1391, 15:18 عصر

سلام
به کدی احتیاج دارم که بزارمش تو دکمم و وقتی روی دکمم کلیک کردم صفحه قفل بشه یعنی مشکی کم رنگ بشه و کاری نشه کرد ، بعد دستوراتی که تو دکمم هست اجرا بشه و سپس دوباره به حالت عادی برگرده صفحه.
میشه چنین کاری رو با ویژوال بیسیک انجام داد؟
ممنون میشم راهنمایییم کنید.
بعد از تابع [رویداد کلیک] خاصیت Enable فرم خودتون رو False کنید
و بعد از تمامی کدها خاصیت Enable فرم خودتون رو True کنید

AbbasVB

سه شنبه 10 مرداد 1391, 17:35 عصر

سلام
به کدی احتیاج دارم که بزارمش تو دکمم و وقتی روی دکمم کلیک کردم صفحه قفل بشه یعنی مشکی کم رنگ بشه و کاری نشه کرد ، بعد دستوراتی که تو دکمم هست اجرا بشه و سپس دوباره به حالت عادی برگرده صفحه.
میشه چنین کاری رو با ویژوال بیسیک انجام داد؟
ممنون میشم راهنمایییم کنید. سلام
نمی دو نم تا حالا آنتی ویروس Avast رو دیدید وقتی می خوای غیر فعالش کنی کل صفحه نمایش رو غیر فعال (تار می کنه) می کنه
اگر درست متوجه شده باشم شما هم همچین چیزی می خواهید درسته؟

R2du-soft

سه شنبه 10 مرداد 1391, 20:15 عصر

سلام
کدی که آقای AbbasVB (http://barnamenevis.org/member.php?205103-AbbasVB) دادن کار نکرد ، دقیقا منطورم همین بود AbbasVB (http://barnamenevis.org/member.php?205103-AbbasVB) جان.
mohammadriano (http://barnamenevis.org/member.php?225833-mohammadriano) جان منظورت این کد بود؟

FormX.Enabled = False

FormX.Enabled = true

چطور میشه کل سیستم رو قفل کرد و پس از اجرای دستوراتم ، کل سیستم باز بشه؟

mohammadriano

سه شنبه 10 مرداد 1391, 21:59 عصر

چطور میشه کل سیستم رو قفل کرد و پس از اجرای دستوراتم ، کل سیستم باز بشه؟
منظور شما دقیقاً از کل سیستم قفل بشه چی هست!

R2du-soft

سه شنبه 10 مرداد 1391, 22:22 عصر

یعنی کاربر هیچ فعالیتی نتونه کنه
کلیک هاش بی معنی باشه ، دکمه های کیبرد بی معنی باشه
دسکتاپ و کل سیستم کار نکنه تا خود برنامه دوباره بعد از تموم شدن دستورات همه چیز رو آزاد کنه

یکی از دوستان گفت از دستور اسکرین رزولیشن استفاده کن ولی نتونستم = میشه؟

mohammadriano

سه شنبه 10 مرداد 1391, 22:50 عصر

یعنی کاربر هیچ فعالیتی نتونه کنه
کلیک هاش بی معنی باشه ، دکمه های کیبرد بی معنی باشه
دسکتاپ و کل سیستم کار نکنه تا خود برنامه دوباره بعد از تموم شدن دستورات همه چیز رو آزاد کنه
یکی از دوستان گفت از دستور اسکرین رزولیشن استفاده کن ولی نتونستم = میشه؟
خب جواب شما رو که در اولین پست دادم.
برای زیباتر شدن برنامه می تونید.
بعد از FormX.Enabled = False شما خاصیت MousePointer رو برابر با 11 قرار دهید [Hourglass].
و بعد از اتمام تمامی کد ها خاصیت MousePointer رو برابر با 0 قرار دهید.
موفق باشی

AbbasVB

چهارشنبه 11 مرداد 1391, 10:01 صبح

کدی که آقای AbbasVB (http://barnamenevis.org/member.php?205103-AbbasVB) دادن کار نکرد
دوست عزیز شرمنده این کد مال یه پست دیگه بودم من اشتباهی توی این تاپیک قرار دادم عذر خواهی می کنم
قبلا یه نمونه مثل همین دیدم فقط یادم نیست با دلفی بود با وی بی اگه پیداش کردم برات می ذارم
موفق باشید

خب جواب شما رو که در اولین پست دادم.
برای زیباتر شدن برنامه می تونید.
بعد از FormX.Enabled = False شما خاصیت MousePointer رو برابر با 11 قرار دهید [Hourglass].
و بعد از اتمام تمامی کد ها خاصیت MousePointer رو برابر با 0 قرار دهید.
موفق باشی

آقای mohammadriano (http://barnamenevis.org/member.php?225833-mohammadriano) اییشون می خواهد کل دسکتاپ و صفحه نمایش رو قفل کنند نه فقط فرم برنامه خودشون رو
برای این که منظروشون رو متوجه بشید یک بار از آنتی ویروس Avast استفاده کنید
یا چرا راه دور بریم مثل زمانی که می خواهی ویندوز اکس پی رو خاموش یا ری استارت کنید یه پنجره میاد که دور برش تاریک میشه
منظور ایشون اینه

R2du-soft

چهارشنبه 11 مرداد 1391, 14:27 عصر

دقیقا AbbasVB (http://barnamenevis.org/member.php?205103-AbbasVB) جان همین منطورم بود

SlowCode

چهارشنبه 11 مرداد 1391, 15:49 عصر

میتونی برنامه Explorer رو از پروسس قطع کنی و هر وقت کارت تموم شد اجراش کنی.

R2du-soft

چهارشنبه 11 مرداد 1391, 15:58 عصر

نه اصلا جالب نیست میخوام همه چیز باشه ولی قفل باشه دقیقا همون چیزی که AbbasVB (http://barnamenevis.org/member.php?205103-AbbasVB) گفت رو میخوام

mohammadriano

چهارشنبه 11 مرداد 1391, 16:06 عصر

آقای mohammadriano (http://barnamenevis.org/member.php?225833-mohammadriano) اییشون می خواهد کل دسکتاپ و صفحه نمایش رو قفل کنند نه فقط فرم برنامه خودشون رو برای این که منظروشون رو متوجه بشید یک بار از آنتی ویروس Avast استفاده کنید
یا چرا راه دور بریم مثل زمانی که می خواهی ویندوز اکس پی رو خاموش یا ری استارت کنید یه پنجره میاد که دور برش تاریک میشه
منظور ایشون اینه
ok

دقیقا AbbasVB (http://barnamenevis.org/member.php?205103-AbbasVB) جان همین منطورم بود
خب از این استفاده کن
90601
حالا سوال شما فقط میشه نحوه بستن این دو کلید LWin و Rwin ؟
نکته
1-دو کلید LWin و Rwin همچنان فعال هستند.
2-برای خارج شدن از برنامه از کلید ترکیبی Ctrl + Break استفاده کنید.
3-رنگ زمینه را هم می توانید به صورت دلخواه در بیارید.
4-کد کلید های LWin و Rwin ـ 91 و 92 هست
موفق باشی

R2du-soft

چهارشنبه 11 مرداد 1391, 17:03 عصر

مرسی mohammadriano (http://barnamenevis.org/member.php?225833-mohammadriano) جان خیلی عالیه
حالا اگه بخوام که بدون کلید ترکیبی و ... آخر دکمم که کدها اجرا شد ، از این حالت خارج بشه باید چیکار کرد؟ (از چه کدی باید استفاده کرد)؟
مرسی

mohammadriano

چهارشنبه 11 مرداد 1391, 17:07 عصر

مرسی mohammadriano (http://barnamenevis.org/member.php?225833-mohammadriano) جان خیلی عالیه
حالا اگه بخوام که بدون کلید ترکیبی و ... آخر دکمم که کدها اجرا شد ، از این حالت خارج بشه باید چیکار کرد؟ (از چه کدی باید استفاده کرد)؟
مرسی

Private Sub Command_Click()
YourForm.Show
'
'
'
'
Unload YourForm
End Sub

hosseinjn

پنج شنبه 12 مرداد 1391, 14:21 عصر

سلام
خسته نباشید
برای اینکه فرمتون هنگ نکنه در زمان اجرای حلقه ها می تونید از دستور DoEvents استفاده کنید
بعد از استفاده از این دستور کلیه پروسس های دیگه شما همزمان با انجام فعالیت حلقه کار می کنند. و می تونید هر گرافیکی رو که دوست دارید فعال کنید.