تماس با من
پروفایل من
نویسنده (های) وبلاگ محسن
آدرس های سایت WWW.SPeeDG.SUB.IR WWW.SPeeDG.PERSIANBLOG.IR آرشیو وبلاگ
      گروه برنامه نویسی اسپید (مرکز آموزش توابع API)
تابع API برای باز کردن یک مسیر نویسنده: محسن - دوشنبه ٢۸ شهریور ۱۳٩٠

با تابع WinExec میتونیم یک مسیر رو در کامپیوتر خودمون با Windows Explorer باز کنیم.

برای اینکار ابتدا کد زیر رو در بخش General فرم قرار میدهیم:

Private Declare Function WinExec Lib "kernel32" Alias "WinExec" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long

سپس با استفاده از کد زیر مسیر مورد نظر رو باز میکنیم. به جای عبارت قرمز مسیر خودتون رو بنویسید.

WinExec "Explorer.exe D:/SPeeDg/" , 1

به جای عدد 1 میتونید عدد های دیگه بزارید و تفاوت رو ببینید.

منبع: Visualbasic.blogfa.com

لینک      نظرات ()      

نسخه جدید فرم ورود نویسنده: محسن - شنبه ٢٦ شهریور ۱۳٩٠

در این نسخه سعی شده که ظاهر رو عوض کنیم و فرم رو زیبا و شیک کنیم.

همچنین نسبت به نسخه قبل در کدنویسی بهتر شده است.

دانلود فرم ورود

دانلود در ادامه مطلب


ادامه مطلب ...
لینک      نظرات ()      

تابع API برای تنظیم کردن مکان یک پنجره نویسنده: محسن - شنبه ٢٦ شهریور ۱۳٩٠

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

توابع API

بعد از بدست آوردن دستگیره مورد نظر کد زیر را در بخش General فرم قرار میدهیم.

Private Declare Function SetWindowPos Lib "user32" (ByVal Hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cX As Long, ByVal cY As Long, ByVal wFlags As Long) As Long

سپس مانند نمونه زیر مکان پنجره و اندازه اون رو مشخص میکنیم.

SetWindowPos Hwnd, 0, 100, 250, 400, 500, swp_showwindow

اگر به جای کلمه قرمز مورد نظر swp_hidewindow رو قرار بدیم پنجره مورد نظر مخفی میشه.

اگر هنوز متوجه نشدید نمونه کار رو از ادامه مطلب دانلود کنید.


ادامه مطلب ...
لینک      نظرات ()      

تابع API برای تشخیص وضعیت یک کلید نویسنده: محسن - جمعه ٢٥ شهریور ۱۳٩٠

با تابع Get AsyncKeyState میتونیم وضعیت یک کلید (فشار داده شده یا نشده) را تشخیص داد.

برای این کار ابتدا کد زیر را در بخش General فرم قرار میدهیم.

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

سپس در یک تایمر با Interval = 1 کد زیر را قرار میدهیم.

به جای عدد 65 که با رنگ قرمز تمیز شده کد اسکی مورد نظرمون رو قرار میدیم.

Dim Char As Integer

For i = 32 To 256

Char = GetAsyncKeyState(i)

If Char = -32767 Then

If i = 65 Then MsgBox "Char is Enable"

End If

Next

لینک      نظرات ()      

دانلود نرم افزار Borland C++ 5 نویسنده: محسن - یکشنبه ۱۳ شهریور ۱۳٩٠

نرم افزار Borland C++ 5 یک محیط برای کد نویسی به زبان C و ++C است که اون رو برای راحتی دانلود به 5 قسمت تقسیم کردم. دانلود هر 5 قسمت الزامی است.

دانلود بخش اول به حجم 18MB

 دانلود بخش دوم به حجم 18MB

دانلود بخش سوم به حجم 18MB

دانلود بخش چهارم به حجم 18MB

دانلود بخش پنجم به حجم 16.57MB 

لینک      نظرات ()      

تابع API برای فهمیدن مدت زمان روشن بودن کامپیوتر نویسنده: محسن - یکشنبه ٦ شهریور ۱۳٩٠

با استفاده از تابع timegetTime میتونیم مدت زمان روشن بودن رایانه رو البته به میلی
ثانیه بگیریم.


آموزش توابع API

Private Declare Function timeGetTime Lib "winmm.dll" Alias "timeGetTime" () As Long

این تابع هیچ آرگومانی نداره و استفاده از اون خیلی آسونه

برای دانلود نمونه کار این تابع به ادامه مطلب بروید.


ادامه مطلب ...
لینک      نظرات ()      

دانلود نرم افزار Notepad++ 5.9.3 نویسنده: محسن - پنجشنبه ۳ شهریور ۱۳٩٠

توضیحات درباره نرم افزار در ادامه مطلب

دانلود نرم افزار


ادامه مطلب ...
لینک      نظرات ()      

مطالب اخیر پست ویژه هفت پروژه ویژوال بیسیک پروژه ادیتور متن با ++C تابع API برای فوکوس کردن روی یک پنجره تابع API برای تغییر زبان تابع API برای باز کردن یک مسیر نسخه جدید فرم ورود تابع API برای تنظیم کردن مکان یک پنجره تابع API برای تشخیص وضعیت یک کلید دانلود نرم افزار Borland C++ 5
کلمات کلیدی وبلاگ اکتیوایکس ویژوال بیسیک (۳) پروژه ++c (۱) پروژه ویژوال بیسیک (۱٦) توابع api (۳٤) نرم افزارهای برنامه نویسی (۳)
دوستان من آپارنت عمارنامه خرید اینترنتی پست های فوتونی