PDA

View Full Version : دنبال چنتا API هستم (Programing Sysytem)



sunboy
دوشنبه 05 مرداد 1383, 18:32 عصر
با سلام
بچه ها می یه API یا برنامه کدی که وقتی برنامه مم اجرا شدش به دیگر پبنجره حتی اجزای
خود وینوز اجتزه دسترسی نده یعنی حداقل تا موقعی که پنجره برنامم بازه مثل پنجره Trun Off Computer ویندوزXP

2 ) همون طور که می دونید دکمه Print Scrn از صفحه جاری ویندوز یه جورایی عکس می گیره و توی وی بی با Sendksy برای این دکمه کدی چیزی در نظر نگرفته شده یا حداقل کار نمی کنه یا شاید م من بلد نباشم شما نمی دونید چه طوری از صفحه جاری ویندوز عکس گرفت

مرسی از جوابای همیشه قشنگتون :oops:

M-Gheibi
دوشنبه 05 مرداد 1383, 19:31 عصر
2 ) به این آدرس یه سری بزنید. خودم امتحان نکردم ولی فکر کنم مشکل حل بشه. :wink:
http://www.vbcode.com/asp/showsn.asp?theID=10470

MM_Mofidi
دوشنبه 05 مرداد 1383, 20:56 عصر
برای حذف دسترسی به اون شکل نمودونم ولی شاید با غیر فعال کردن ctrl+alt+del و قطع دسترسی به task bar و استفاده از یک پنجره full screen ولو بصورتی که back ground آن عکسی از desktop باشد. منظور نظر شما حاصل شود.
برای غیر فعال کردن ctrl+alt+del و قطع دسترسی به task bar هم میتوانی در همان سایت VBcode که آقای غیبی زحمت کشیدن و لینک گذاشتن کلی کدهای مختلف پیدا کنی.

sunboy
دوشنبه 05 مرداد 1383, 21:36 عصر
برای حذف دسترسی به اون شکل نمودونم ولی شاید با غیر فعال کردن ctrl+alt+del و قطع دسترسی به task bar و استفاده از یک پنجره full screen ولو بصورتی که back ground آن عکسی از desktop باشد. منظور نظر شما حاصل شود.
برای غیر فعال کردن ctrl+alt+del و قطع دسترسی به task bar هم میتوانی در همان سایت VBcode که آقای غیبی زحمت کشیدن و لینک گذاشتن کلی کدهای مختلف پیدا کنی.

حرف شما کاملا مطینه اما چه طوری از دسک تاپ عکس بگیرم :oops:

mr_esmaily
دوشنبه 05 مرداد 1383, 23:36 عصر
سلام
نمی دونم من منظور شما رو درست متوجه شدم یا نه ولی اگه بخواین دسکتاپ رو غیر فعال کنید می تونید اول با تابع GetDesktopWindow هندل دسکتاپ رو به دست بیارین بعد با استفاده از تابع EnableWindow اونو غیر فعال کنید.

sunboy
سه شنبه 06 مرداد 1383, 00:36 صبح
سلام
نمی دونم من منظور شما رو درست متوجه شدم یا نه ولی اگه بخواین دسکتاپ رو غیر فعال کنید می تونید اول با تابع GetDesktopWindow هندل دسکتاپ رو به دست بیارین بعد با استفاده از تابع EnableWindow اونو غیر فعال کنید.

خیلی خویه می شه یه مثال بزنید
راستی من میخوام وقتی برنامم اجرا شد به کلیه اجرای ویندوز دسترسی نداشته باشه (یعنی Enable شه ) مثلا دید وقتی ویندوز رو شات دان می کنید وقتی اون فرم ویندوز می اد دیگه تا اونو کنسل نکنید نمیشه کاری کرد :)

linux
سه شنبه 06 مرداد 1383, 08:27 صبح
مطینه
مجید جان متین اینجوری نوشته میشه

mr_esmaily
سه شنبه 06 مرداد 1383, 09:54 صبح
سلام
اون تابعی که من گفتم هر چی توی دسکتاپ باشه هم غیر فعال می کنه(حتی برنامه شما!).
من یه اکتیویکسی دارم که از دسکتاپ عکس میگیره منتها باید بگردم (:D) .اگه به کارتون میاد بگین سعی می کنم پیداش کنم.

sunboy
سه شنبه 06 مرداد 1383, 11:16 صبح
مطینه
مجید جان متین اینجوری نوشته میشه

ای خدا شما هم وقت گیر اوریدا من از همون اول دیکتم ضعیف بودش :)

sunboy
سه شنبه 06 مرداد 1383, 11:22 صبح
سلام
اون تابعی که من گفتم هر چی توی دسکتاپ باشه هم غیر فعال می کنه(حتی برنامه شما!).
من یه اکتیویکسی دارم که از دسکتاپ عکس میگیره منتها باید بگردم (:D) .اگه به کارتون میاد بگین سعی می کنم پیداش کنم.

اگه پیداش کنی که ممنونت می شم راستی با اون لینکی که داش مسعود محبت کردن یه تابع داره که از دسک تاپ عکس می کیره اگه شما هم OCX پیدا کنید خیلی ممنون می شم

برای غیر فعال کردن من یه API پیدا کردم که ورودهای سیستم موس و کیبرد رو قفل می کنه یا از کار میندازه جون مبده برای نوشتن برنامه های خطرناک :twisted:



Private Declare Function BlockInput Lib "user32.dll" (ByVal fblock As Long) As Long

مثال


Blockinput true

راستی اه دوستان توابعی که یه جواری خطرناک هستند اگه بلدند بگند (خدا اقای کرامتی این ورا پیداش نشه 8-) )

mr_esmaily
سه شنبه 06 مرداد 1383, 11:24 صبح
سلام

ای خدا شما هم وقت گیر اوریدا من از همون اول دیکتم ضعیف بودش
با تذکرات جناب Linux تا چند مدته دیگه دیکتتونم قوی میشه! :mrgreen:

mr_esmaily
سه شنبه 06 مرداد 1383, 11:26 صبح
سلام

برای غیر فعال کردن من یه API پیدا کردم که ورودهای سیستم موس و کیبرد رو قفل می کنه یا از کار میندازه جون مبده برای نوشتن برنامه های خطرناک
اگه از این برای برنامت استفاده کنی طرف چجوری بدون موس و کیبورد با برنامت کار میکنه؟!

sunboy
سه شنبه 06 مرداد 1383, 11:30 صبح
خوب می شه باهاش مثلا اقا اینو از من نشنیده بگیرید ا چون داش کرامتی باز میاد تاپیک مارو پاک می کنه :lol: ویروس (وای خاک عالم) نوشت

Voldemort
سه شنبه 06 مرداد 1383, 12:23 عصر
این کد شبیه سازی کلید PrnScrn


Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Const VK_SNAPSHOT As Byte = 44

Clipboard.Clear
DoEvents
keybd_event VK_SNAPSHOT, 0, 0, 0
DoEvents
Picture1.PaintPicture Clipboard.GetData, 0, 0

MM_Mofidi
سه شنبه 06 مرداد 1383, 12:39 عصر
حرف شما کاملا مطینه اما چه طوری از دسک تاپ عکس بگیرم :oops:
مگه آقا مسعود لینک نگذاشته خوب dump کن (save as file)بعد با یه Picture Box روی back grounفرمت لودش کن.

MM_Mofidi
سه شنبه 06 مرداد 1383, 13:01 عصر
راستی یک نگاهی به اینها بنداز
http://www.vbcode.com/asp/showsn.asp?theID=673
http://www.vbcode.com/asp/showsn.asp?theID=114
http://www.vbcode.com/asp/showsn.asp?theID=128
http://www.vbcode.com/asp/showsn.asp?theID=5105
http://www.vbcode.com/asp/showsn.asp?theID=108
http://www.vbcode.com/asp/showsn.asp?theID=9159
http://www.vbcode.com/asp/showzip.asp?ZipFile=http%3A%2F%2Fwww%2Evbcode%2Eco m%2Fcode%2FAlwaysontop%2Ezip&theID=4565

sunboy
سه شنبه 06 مرداد 1383, 17:55 عصر
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Const VK_SNAPSHOT As Byte = 44

Clipboard.Clear
DoEvents
keybd_event VK_SNAPSHOT, 0, 0, 0
DoEvents
Picture1.PaintPicture Clipboard.GetData, 0, 0

از همتون ممنونم خیلی لطف کردید من واقعا لذت می برم این کمک کردن ها رو می بینم بی وفایی ..... :)