Private Declare Function GetActivateWindow Lib "user32.dll" () As Long
اين تابع هندل پنجره (فرم) فعال را بر مي گرداند
اگر تابع با خطايي مواجه شود مقدار بازگشتي صفر و در غير اينصورت مقدار بازگشتي هندل پنجره فعال خواهد بود
Private Declare Function GetActiveWindow Lib "user32.dll" () As Long
اين تابع هندل پنجره فعال را بر مي گرداند
اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر و در غير اينصورت مقدار بازگشتي هندل پنجره فعال خواهد بود
Private Const GA_PARENT = 1
Private Const GA_ROOT = 2
Private Declare Function GetAncestor Lib "user32.dll" (ByVal hwnd As Long, ByVal uFlag As Long) As Long
اين تابع پنجره مادر يک پنجره دلخواه را به دست مي آورد
اگر تابع با خطايي مواجه شود مقدار بازگشتي صفر و در غير اينصورت مقدار بازگشتي هندل پنجره مادر خواهد بود
hwnd : هندل پنجره مورد نظر
uFlag : مشخص مي کند تابع هندل کدام پنجره مادر را بايد بر گرداند
GA_PARENT : پنجره مادر پنجره داده شده را به دست مي آورد
GA_ROOT : هندل فرم مادر پنجره داده شده را به دست مي آورد
Private Declare Function GetBkColor Lib "gdi32.dll" Alias "GetBkColor" (ByVal hdc As Long) As Long
اين تابع رنگ پس زمينه يک کنترل گرافيکي را بر مي گرداند
گر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود
hdc : هندل بافت گرافيکي کنترل مورد نظر
Private Declare Function GetCaretBlinkTime Lib "user32.dll" (ByVal wMSeconds As Long) As Long
اين تابع سرعت چشمک زدن نشانگر صفحه کليد را به دست مي آورد
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود
wMSeconds : اين بافر توسط تابع مقدار دهي مي شود و حاوي سرعت چشمک زدن نشانگر صفحه کليد بر حسب ميلي ثانبه خواهد بود
Private Declare Function GetClassNameA Lib "user32.dll" (ByVal hwnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As Long
اين تابع هندل يك پنجره را گرفته و ClassName ش را برميگرداند .
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و در غير اينصورت مقدار بر گشتي صفر خواهد بود
hwnd : هندل پنجره ميباشد .
lpClassName : اين متغير که توسط تابع مقداردهي مي شود حاوي کلاس پنجره مورد نظر خواهد بود
nMaxCount : طول بافر lpClassName
Private Declare Function GetClientRect Lib "user32.dll" (ByVal hwnd As Long, ByVal lpRect As Rect) As Long
اين تابع هندل يک پنجره را مي گيرد و مختصات چهارچوب آن نسبت به خود پنجره را بر مي گرداند ( يعني مختصان top و left هميشه صفر خواهند بود و مختصات right و bottom به ترتيب به عرض و ارتفاع پنجره اشاره مي کنند )
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود
hwnd : هندل پنجره مورد نظر
lpRect : اين بافر توسط تابع مقدار دهي مي شود و حاوي چهار چوب پنجره مورد نظر از نوع RECT خواهد بود
Private Const CF_TEXT = 1
Private Const CF_BITMAP = 2
Private Const CF_JPEG = 19
Private Const CF_METAFILE = 14
Private Declare Function SetClipboardData Lib "user32.dll" (ByVal wFormat As Long) As Long
اين تابع دادهء موجود در کليپ بورد را بر مي گرداند
اگر تابع با خطايي مواجه شود مقدار صرف را بر مي گرداند در غير اينصورت يک اشاره گر از داده داخل کليپ بورد را بر مي گرداند
wFormat : اين بافر توسط تابع مقدار دهي مي شود و بيانگر نوع داده کليپ بورد خواهد بود (ثابت هاي زير)
CF_TEXT : داده از نوع متني ساده است
CF_BITMAP : تصوير نقشه بيتي
CF_JPEG : تصوير فشرده جي پگ
CF_METAFILE : تصوير از نوع ابر فايل ويندوز (Windows Meta File)
Private Declare Function GetCommandLine Lib "kernel32.dll" () As Long
اين تابع يک اشاره گر از فايل اجرايي برنامه جاري بر مي گرداند
اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر و در غير اينصورت مقدار بازگشتي يک اشاره گر از فايل اجرايي جاري خواهد بود
Private Declare Function GetComputerNameA Lib "kernel32.dll" (ByVal lpBuffer As String, nSize As Long) As Long
اين تابع نام كامپيوتري كه برنامه را اجرا ميكند را برميگرداند .
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و در غير اينصورت مقدار بر گشتي صفر خواهد بود
lpBuffer : اين متغير که توسط تابع مقداردهي مي شود حاوي کلاس پنجره مورد نظر خواهد بود
nSize : طول بافر lpBuffer
Private Declare Function GetCurrentDirectory Lib "kernel32.dll" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
اين تابع آدرس مسير جاري را برميگرداند
اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر و گر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر خواهد بود که هندل پنجره فعال است
nBufferLength : طول بافر lpBuffer
lpBuffer : مقدار اين بافر توسط تابع مقدار دهي مي شود و حاوي مسير جاري خواهد بود
Private Declare Function GetCurrentProcess Lib "kernel32.dll" () As Long
اين تابع يک اشاره گر از پردازش فعلي (فايل اجرايي برنامه) بر مي گرداند
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود
Private Declare Function GetCurrentProcessId Lib "kernel32.dll" () As Long
اين تابع يک ID از فايل اجرايي جاري بر مي گرداند. اين ID مي تواند در توابعي مانند RegisterServiceProcess به کار رود
اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر و در غير اينصورت مقدار بازگشتي ID فايل اجرايي جاري خواهد بود
Private Declare Function GetCursor Lib "user32.dll" () As Long
اين تابع يک اشاره گر از کرسر فعلي بر مي گرداند. از اين اشاره گر مي توان در توابع کار با آيکون ها استفاده کرد
اگر تابع با خطايي مواجه شود مقدار بازگشتي صفر و در غير اينصورت مقدار بازگشتي يک اشاره گر از کرسر فعلي خواهد بود
Public Declare Function GetCursorPos Lib "user32.dll" (lpPoint As POINTAPI) As Long
اين تابع مختصات فعلي ماوس را بر مي گرداند
lpPoint : اين بافر توسط تابع مقدار دهي مي شود و حاوي مختصات ماوس از نوع POINTAPI خواهد بود
Private Declare Function GetDC Lib "user32.dll" (ByVal hwnd As Long) As Long
اين تابع هندل يک تابع را ميگيرد و يک اشاره گر از ساختار بافتي پنجره (hdc) بر مي گرداند
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود
hwnd : هندل پنجره (کنترل) مورد نظر
GetDefaultUserProfileDirectoryA
Private Declare Function GetDefaultUserProfileDirectoryA Lib "usernv.dll" (ByVal lpProfileDir As String) As Boolean
اين تابع مسير پوشه تنظيمات مربوط به کاربر پيش فرض را بر مي گرداند( Document and Settings )
گر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي True و اگر تابع با خطايي مواجه شود مقدار بر گشتي False خواهد بود
lpProfileDir : اين بافر توسط تابع مقدار دهي مي شود و حاوي مسير پوشه مورد نظر خواهد بود
lpcchSize : اين متغير طول بافر lpProfileDir را بيان مي کتد
Private Declare Function GetDesktopWindow Lib "user32.dll" () As Long
اين تابع هندل دسکتاپ را به دست مي آورد
اگر تابع با خطايي مواجه شود مقدار برگشتي آن صفر خواهد بود در غير اين صورت مقدار برگشتي هندل دسکتاپ خواهد بود
Public Declare Function GetDiskFreeSpaceA Lib "kernel32.dll" (ByVal lpRootPathName As String, lpSectorsPerCluster As Long, lpBytesPerSector As Long, lpNumberOfFreeClusters As Long, lpTotalNumberOfClusters As Long) As Long
اين تابع ميزان فضاي خالي موجود در يک درايو را بر مي گرداند
گر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود
lpRootPathName : مسير درايو مورد نظر
lpSectorsPerCluster : اين بافر توسط تابع مقدار دهي مي شود و تعداد سکتور هاي هر کلاستر را بر مي گرداند
lpBytesPerSector : اين بافر توسط تابع مقدار دهي مي شود و تعداد بايت هاي هر سکتور را بر مي گرداند
lpNumberOfFreeClusters : اين بافر توسط تابع مقدار دهي مي شود و تعداد کلاستر هاي خالي را بر مي گرداند
lpTotalNumberOfClusters : اين بافر توسط تابع مقدار دهي مي شود و تعداد کل کلاستر ها را بر مي گرداند