مرجع تخصصی توابع api همراه با توضیح انها

Printable View

نمایش 50 پست از این تاپیک در یک صفحه

سه شنبه 16 بهمن 1386, 10:55 صبح
majjjj
```
 

Ellipse
```
```
 

Private Declare Function Ellipse Lib "gdi32.dll" (ByVal Hdc As Long, ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
```
این تابع یک اشاره گر از یک آیکون می گیرد و یک اشاره گر جدید از آن بر می گرداند و در واقع یک کپی از آن تهیه می کند
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی یک اشاره گر کپی آیکون مورد نظر خواهد بود
hInst : این متغیر مورد استفاده قرار نمی گیرد. می توانید مقدار آن را برابر صفر قرار دهید
hIcon : یک اشاره گر از آیکون مبدا
سه شنبه 16 بهمن 1386, 10:57 صبح
majjjj
```
 

EmptyClipboard
```
```
 

Private Declare Function EmptyClipboard Lib "user32.dll" () As Long
```
این تابغ داده های موجود در کلیپ بورد ویندوز را پاک می کند ( در ویژوال بیسیک دستور Clipboard.Clear همین کار را انجام می دهد)
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
سه شنبه 16 بهمن 1386, 10:58 صبح
majjjj
```
 

EnableWindow
```
```
 

Private Declare Function EnableWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal fEnabled As Long) As Long
```
این تابع یک پنجره ( فرم یا کنترل ) را فعال یا غیرفعال می کند
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hwnd : هندل پنجره مورد نظر
fEnabled : اگر صفر باشد پنجره غیر فعال و اگر یک باشد پنجره فعال می شود
سه شنبه 16 بهمن 1386, 10:59 صبح
majjjj
```
 

EncryptFileA
```
```
 

Private Declare Function EncryptFileA Lib "advapi32.dll" (ByVal lpFileName As String) As Boolean
```
این تابع یک فایل را رمز گذاری می کند. فایل رمز گذاری شده را می توان با تابع DecryptFileA به حالت عادی باز گرداند
این تابع بر روی سیستم فایلی ntfs کار می کند و کاربر باید اختیارات لازم برای این کار را داشته باشد
lpFileName : نام فایل رمز گذاری شده
سه شنبه 16 بهمن 1386, 11:00 صبح
majjjj
```
 

EndMenu
```
```
 

Private Declare Function EndMenu Lib "user32.dll" () As Long
```
این تابع تمام منوهای باز پنجره جاری را می بندد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
سه شنبه 16 بهمن 1386, 11:04 صبح
majjjj
```
 

EnumFontsA
```
```
 

Private Declare Function EnumFonts Lib "gdi32" Alias "EnumFontsA" (ByVal hDC As Long, ByVal lpsz As String, ByVal lpFontEnumProc As Long, ByVal lParam As Long) As Long
```
این تابع لیست تمام فونت های موجود در سیستم را به دست می آورد
hDC : هندل بافت گرافیکی پنجره ای که تابع باید تحت آن اجرا شود
lpsz : خانواده فونت مورد نظر که اعضای آن باید جمع آوری شود. این متغیر به vbNul ختم می شود (برای اینکه لیست تمام فونت ها را به دست آورید از vbNullString استفاده کنید )
lpFontEnumProc : تابعی که باید لیست فونت های جمع شده به آن ارسال شود. از کلید واژه AddressOf برای اعلام محل تابع در حافظه استفاده کنید. (مثال AddressOf EnumFontProc). تابع باید مشابه تابعی که در کد نوشته شده است باشد. تازمانی که تابع مقدار True را برگرداند لیست کردن فونت ها ادامه خواهد داشت
lParam : این متغیر را به دلخواه خود می توانید مقدار دهی کنید. این متغیر عیناً به تابع EnumFontProc ارسال خواهد شد
سه شنبه 16 بهمن 1386, 11:06 صبح
majjjj
```
 

EnumWindows
```
```
 

Private Declare Function EnumWindows Lib "user32.dll" (ByVal lpEnumFunc As Long, ByVal lParam As Long) As Long

Public Function EnumWindowsProc(ByVal hwnd As Long, ByVal lParam As Long) As Boolean

   ' Put your code here

   EnumWindowsProc = True

End Function
```
این تابع لیست تمام پنجره های تحت یک پنجره دیگر را به دست می آورد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
lpEnumFunc : تابعی که باید لیست پنجره به آن ارسال شود. از کلید واژه AddressOf برای اعلام محل تابع در حافظه استفاده کنید. (مثال AddressOf EnumWindowsProc). تابع باید مشابه تابعی که در کد نوشته شده است باشد. تازمانی که تابع مقدار True را برگرداند لیست کردن پنجره ها ادامه خواهد داشت
lParam : این متغیر را به دلخواه خود می توانید مقدار دهی کنید. این متغیر عیناً به تابع EnumWindowsProc ارسال خواهد شد
چهارشنبه 17 بهمن 1386, 11:19 صبح
majjjj
```
 

ExitWindowsEx
```
```
 

EWX_LOGOFF = 0

EWX_SHUTDOWN = 1

EWX_REBOOT = 2

EWX_FORCE = 4

EWX_POWEROFF = 8

EWX_RESET = EWX_LOGOFF + EWX_REBOOT + EWX_FORCE
```
```
 

Private Declare Function ExitWindowsEx Lib "user32.dll" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
```
این تابع به منظور خاموش کردن یا راه اندازی مجدد ویندوز به کار می رود
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
uFlags : این متغیر بیان کننده نحوه کار تابع با سیستم است (ثابت های نوشته شده در کد )
dwReserved : مقدار این متغیر ByVal 0& است
چهارشنبه 17 بهمن 1386, 11:20 صبح
majjjj
```
 

ExtractIconA
```
```
 

Private Declare Function ExtractIcon Lib "shell32.dll" (ByVal hInst As Long, ByVal lpszExeFileName As String, ByVal nIconIndex As Long) As Long
```
این تابع یک آیکون را از یک فایل محتوی آیکون (exe,dll,ocx,ico) استخراج می کند و یک اشاره گر از آن را بر می گرداند
اگر تابع به علت عدم وجود فایل مورد نظر دچار خطا شود مقدار یک و اگر شماره آیکون مورن نظر در فایل وجود نداشته باشد عدد صفر را بر می گرداند و اگر کار خود را با موفقیت انجام دهد مقدار بر گشتی یا اشاره گر از آیکون مورد نظر خواهد بود
hInst : هندل پنجره ای که تابع تحت آن اجرا می شود
lpszExeFileName : نام فایل مورد نظر
nIconIndex : شماره آیکون مورد نظر
چهارشنبه 17 بهمن 1386, 11:22 صبح
majjjj
```
 

FatalAppExitA
```
```
 

Private Declare Sub FatalAppExitA Lib "kernel32.dll" (ByVal uAction As Long, ByVal lpMessageText As String)
```
این تابع یک پیغام اخطار به کاربر نشان می دهد سپس به اجرای برنامه خاتمه می دهد. از این تابع زمانی استفاده می شود که برنامه با خطایی مواجه شود و شما از Unload کردن کامل برنامه مطمئن نباشید
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
uAction : مقدار این متغیر صفر است
lpMessageText : متنی که باید به کاربر نشان داده شود. این متن نباید از 35 کاراکتر بیشتر باشد
چهارشنبه 17 بهمن 1386, 11:24 صبح
majjjj
```
 

fCreateShellLink
```
```
 

Private Declare Function fCreateShellLink Lib "vb6stkit.dll" (ByVal lpstrFolderName As String, ByVal lpstrLinkName As String, ByVal lpstrLinkPath As String, ByVal lpstrLinkArguments As String, ByVal fPrivate As Long, ByVal sParent As String) As Long
```
این تابع یک میانبر از یک فایل دلخواه در مسیر داده شده می سازد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
lpstrFolderName : مسیری که میانبر باید در آنجا ساخته شود
lpstrLinkName : نام میانبر ساختا شده
lpstrLinkPath : فایلی که باید با کلیک بر روی میانبر اجرا شود
lpstrLinkArguments : آرگومان های میانبر (درصورت لزوم)
fPrivate : اگر False باشد میانبر ساخته نمی شود و اگر True باشد میانبر ساخته می شود
sParent :
چهارشنبه 17 بهمن 1386, 11:27 صبح
majjjj
```
 

FindExecutableA
```
```
 

Private Declare Function FindExecutableA Lib "shell32.dll" (ByVal lpFile As String, ByVal lpDirectory As String, ByVal lpResult As String) As Long
```
این تابع برنامه مرتبط با یک فایل خاص را بر می گرداند
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی یک اشاره گر از قلم ساخته شده خواهد بود
lpFile : فایل مورد نظر
lpDirectory : فولدر پیش فرض
lpResult : این بافر توسط تابع مقدار دهی می شود حاوی آدرس فایل اجرایی مرتبط با فایل مورد نظر خواهد بود. مقدار این بافر را با اندازه کافی بلند در نظر بگیرید ( این بافر را با رشته ای از جای خالی مقدار دهی کنید. برای مثال ( Space ( 255 )
چهارشنبه 17 بهمن 1386, 11:28 صبح
majjjj
```
 

FindWindowA
```
```
 

Private Declare Function FindWindowA Lib "user32.dll" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
```
این تابع یک پنجره با مشخصات داده شده را پیدا می کند
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و در غیر اینصورت مقدار بازگشتی هندل پنجره مورد نظر خواهد بود
lpClassName : نام کلاس پنجره مورد نظر
lpWindowName : نوشته یا Caption مورد نظر
( توجه : هر کدام از متغیر ها را که نخواستید مقدار دهی کنید با ثابت vbNullString جایگزین کنید )
چهارشنبه 17 بهمن 1386, 11:30 صبح
majjjj
```
 

FindWindowExA
```
```
 

Private Declare Function FindWindowExA Lib "user32.dll" (ByVal hwndParent As Long, ByVal hwndChildAfter As Long, ByVal lpszClass As String, ByVal lpszCaption As String) As Long
```
این تابع توانایی پیدا کردن یک پنجره مشخص را دارد
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و در غیر اینصورت مقدار بازگشتی هندل پنجره مورد نظر خواهد بود
hwndParent : اشاره گر پنجره مادر پنجره مورد نظر
hwndChildAfter : اشاره گر پنجره دختر (Child) پنجره مورد نظر
lpszClass : نام کلاس پنجره مورد نظر
lpszCaption : عنوان (Caption) پنجره مورد نظر
(توجه : فقط یکی از متغیر های lpszClass و lpszCaption را می توانید مقدار دهی کنید و دیگری را باید با vbNullString مقدار دهی کنید)
چهارشنبه 17 بهمن 1386, 11:31 صبح
majjjj
```
 

FlashWindow
```
```
 

Private Declare Function FlashWindow Lib "user32.dll" (ByVal hwnd As Long, bInvert As Long) As Long
```
این تابع پنجره و نشانهء آن بر روی Task Bar را فلش می کند ( به حالت چشمک زن در می آورد)
اگر قبل از فراخوانی پنجره فعال باشد تابع مقدار غیر صفر را بر می گرداند در غیر اینصورت مقدار بر گشتی تابع صفر خواهد بود
hwnd : هندل پنجره مورد نظر
bInvert : مدت زمانی که پنجره باید های لایت بماند (برحسب میلی ثانیه)
چهارشنبه 17 بهمن 1386, 11:33 صبح
majjjj
```
 

FlashWindowEx
```
```
 

Private Type FLASHWINFO

    cbSize As Long

    hwnd As Long

    dwFlags As Long

    uCount As Long

    dwTimeout As Long

End Type
```
```
 

Private Declare Function FlashWindowEx Lib "user32.dll" (pfwi As FLASHWINFO) As Long
```
این تابع عنوان یک پنجره را به حالت چشمک زن در می آورد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
چهارشنبه 17 بهمن 1386, 11:34 صبح
majjjj
```
 

FloodFill
```
```
 

Private Declare Function FloodFill Lib "gdi32.dll" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long, ByVal crColor As Long) As Long
```
این تابع داخل یک منطقه محدود شده توسط یک رنگ خاص را رنگ آمیزی می کند
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی یک اشاره گر از قلم ساخته شده خواهد بود
hdc : هندل بافت گرافیکی کنترل مورد نظر
X : عرض نقطه مورد نظر
Y : طول نقطه مورد نظر
crColor : رنگی که تابع تا رسیدن به آن رنگ محدوده مورد نظر را رنگ آمیزی می کند
چهارشنبه 17 بهمن 1386, 11:37 صبح
majjjj
```
 

GetActivateWindow
```
```
 

Private Declare Function GetActivateWindow Lib "user32.dll" () As Long
```
این تابع هندل پنجره (فرم) فعال را بر می گرداند
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی هندل پنجره فعال خواهد بود
پنج شنبه 18 بهمن 1386, 09:31 صبح
majjjj
```
 

GetAncestor
```
```
 

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 : هندل فرم مادر پنجره داده شده را به دست می آورد
پنج شنبه 18 بهمن 1386, 09:32 صبح
majjjj
```
 

GetBkColor
```
```
 

Private Declare Function GetBkColor Lib "gdi32.dll" Alias "GetBkColor" (ByVal hdc As Long) As Long
```
این تابع رنگ پس زمینه یک کنترل گرافیکی را بر می گرداند
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
پنج شنبه 18 بهمن 1386, 09:33 صبح
majjjj
```
 

GetCaretBlinkTime
```
```
 

Private Declare Function GetCaretBlinkTime Lib "user32.dll" (ByVal wMSeconds As Long) As Long
```
این تابع سرعت چشمک زدن نشانگر صفحه کلید را به دست می آورد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
شنبه 20 بهمن 1386, 13:18 عصر
majjjj
```
 

GetClassNameA
```
```
 

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
یک شنبه 21 بهمن 1386, 09:51 صبح
majjjj
```
 

GetClientRect
```
```
 

Private Type RECT

     Left As Long

     Top As Long

     Right As Long

     Bottom As Long

End Type
```
```
 

Private Declare Function GetClientRect Lib "user32.dll" (ByVal hwnd As Long, ByVal lpRect As Rect) As Long
```
این تابع هندل یک پنجره را گرفته و ClassName ش را برمیگرداند .
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و در غیر اینصورت مقدار بر گشتی صفر خواهد بود
hwnd : هندل پنجره میباشد .
lpClassName : این متغیر که توسط تابع مقداردهی می شود حاوی کلاس پنجره مورد نظر خواهد بود
nMaxCount : طول بافر lpClassName
جمعه 26 بهمن 1386, 23:06 عصر
علی خدایاری

من میخوام یک منو طراحی کنم اما تو نمایش اون مشکل دارم. یعنی نمیتونم طوری نمایش بدم که کاربر وقتی جای دیگه کلیک میکنه منو پاک بشه (خاصیت اصلی منوها) میشه کد این کار رو قرار بدید؟ ممنونم
شنبه 27 بهمن 1386, 08:14 صبح
majjjj

دوست عزیز اینجا مرجع api هست لطفا سوال خود را دریک تایپیک جدید مطرح فرمایید
با این وجود یک نمونه تو تایپیک بعدی براتون گذاشتم البته دلیلش هم این بود که
نشد سورس رو اینجا بگذارم
شنبه 27 بهمن 1386, 09:51 صبح
majjjj

1 ضمیمه

این نمونه رو ببینین
شنبه 27 بهمن 1386, 10:55 صبح
majjjj
```
 

GetClipboardData
```
```
 

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)
شنبه 27 بهمن 1386, 10:56 صبح
majjjj
```
 

GetCommandLine
```
```
 

Private Declare Function GetCommandLine Lib "kernel32.dll" () As Long
```
این تابع یک اشاره گر از فایل اجرایی برنامه جاری بر می گرداند
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و در غیر اینصورت مقدار بازگشتی یک اشاره گر از فایل اجرایی جاری خواهد بود
شنبه 27 بهمن 1386, 10:57 صبح
majjjj
```
 

GetComputerNameA
```
```
 

Private Declare Function GetComputerNameA Lib "kernel32.dll" (ByVal lpBuffer As String, nSize As Long) As Long
```
این تابع نام کامپیوتری که برنامه را اجرا میکند را برمیگرداند .
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و در غیر اینصورت مقدار بر گشتی صفر خواهد بود

lpBuffer : این متغیر که توسط تابع مقداردهی می شود حاوی کلاس پنجره مورد نظر خواهد بود
nSize : طول بافر lpBuffer
شنبه 27 بهمن 1386, 11:00 صبح
majjjj
```
 

GetCurrentDirectory
```
```
 

Private Declare Function GetCurrentDirectory Lib "kernel32.dll" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
```
این تابع آدرس مسیر جاری را برمیگرداند
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر خواهد بود که هندل پنجره فعال است
nBufferLength : طول بافر lpBuffer
lpBuffer : مقدار این بافر توسط تابع مقدار دهی می شود و حاوی مسیر جاری خواهد بود
شنبه 27 بهمن 1386, 23:46 عصر
علی خدایاری

نقل قول:

نوشته شده توسط majjjj

این نمونه رو ببینین

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

در مورد فرمایشتون هم باید عرض کنم که این کار را انجام دادم ولی کسی پاسخ نداد
باز هم ممنونم:تشویق::تشویق:
دوشنبه 29 بهمن 1386, 10:24 صبح
m_vb1386

نقل قول:

نوشته شده توسط علی خدایاری

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

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

چرا این کار رو با ادیتور بیسیک انجام نمیدین
دوشنبه 29 بهمن 1386, 11:19 صبح
Mbt925

نقل قول:

نوشته شده توسط علی خدایاری

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

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

شرکت vbaccelerator یه Dll اه فوق العاده خوب و انعطاف پذیر برای ایجاد منو های PopUp ایجاد کرده ، که هر قابلیتی که فکرش رو بکنین ، داره.
نمونه ی ساده و قابل فهمی هم قرار داده:

نقل قول:

http://www.vbaccelerator.com/home/VB...LL/article.asp
دوشنبه 29 بهمن 1386, 11:28 صبح
majjjj

نقل قول:

نوشته شده توسط Mbt925

شرکت vbaccelerator یه Dll اه فوق العاده خوب و انعطاف پذیر برای ایجاد منو های PopUp ایجاد کرده ، که هر قابلیتی که فکرش رو بکنین ، داره.
نمونه ی ساده و قابل فهمی هم قرار داده:

امیدوارم با پاسخ مدیر بخش مشکلتون حل شده باشه
دوشنبه 29 بهمن 1386, 11:31 صبح
majjjj
```
 

GetCurrentProcess
```
```
 

Private Declare Function GetCurrentProcess Lib "kernel32.dll" () As Long
```
این تابع یک اشاره گر از پردازش فعلی (فایل اجرایی برنامه) بر می گرداند
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
سه شنبه 30 بهمن 1386, 09:36 صبح
majjjj
```
 

GetCurrentProcessId
```
```
 

Private Declare Function GetCurrentProcessId Lib "kernel32.dll" () As Long
```
این تابع یک ID از فایل اجرایی جاری بر می گرداند. این ID می تواند در توابعی مانند RegisterServiceProcess به کار رود
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و در غیر اینصورت مقدار بازگشتی ID فایل اجرایی جاری خواهد بود
سه شنبه 30 بهمن 1386, 09:37 صبح
majjjj
```
 

GetCursor
```
```
 

Private Declare Function GetCursor Lib "user32.dll" () As Long
```
این تابع یک اشاره گر از کرسر فعلی بر می گرداند. از این اشاره گر می توان در توابع کار با آیکون ها استفاده کرد
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی یک اشاره گر از کرسر فعلی خواهد بود
سه شنبه 30 بهمن 1386, 09:39 صبح
majjjj
```
 

GetCursorPos
```
```
 

Public Type POINTAPI

        x As Long

        y As Long

End Type
```
```
 

Public Declare Function GetCursorPos Lib "user32.dll" (lpPoint As POINTAPI) As Long
```
این تابع مختصات فعلی ماوس را بر می گرداند
lpPoint : این بافر توسط تابع مقدار دهی می شود و حاوی مختصات ماوس از نوع POINTAPI خواهد بود
سه شنبه 30 بهمن 1386, 09:59 صبح
majjjj
```
 

GetDefaultUserProfileDirectoryA
```
```
 

Private Declare Function GetDefaultUserProfileDirectoryA Lib "usernv.dll" (ByVal lpProfileDir As String) As Boolean
```
این تابع مسیر پوشه تنظیمات مربوط به کاربر پیش فرض را بر می گرداند( Document and Settings )
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی True و اگر تابع با خطایی مواجه شود مقدار بر گشتی False خواهد بود
lpProfileDir : این بافر توسط تابع مقدار دهی می شود و حاوی مسیر پوشه مورد نظر خواهد بود
lpcchSize : این متغیر طول بافر lpProfileDir را بیان می کتد
سه شنبه 30 بهمن 1386, 10:05 صبح
majjjj
```
 

GetDesktopWindow
```
```
 

Private Declare Function GetDesktopWindow Lib "user32.dll" () As Long
```
این تابع هندل دسکتاپ را به دست می آورد
اگر تابع با خطایی مواجه شود مقدار برگشتی آن صفر خواهد بود در غیر این صورت مقدار برگشتی هندل دسکتاپ خواهد بود
سه شنبه 30 بهمن 1386, 10:06 صبح
majjjj
```
 

GetDiskFreeSpaceA
```
```
 

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 : این بافر توسط تابع مقدار دهی می شود و تعداد کل کلاستر ها را بر می گرداند
سه شنبه 30 بهمن 1386, 10:08 صبح
majjjj
```
 

GetDoubleClickTime
```
```
 

Private Declare Function GetDoubleClickTime Lib "user32.dll" () As Long
```
این تابع زمان Double Click را برمیگرداند
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی حد اکثر زمان مورد قبول بین دو دابل کلیک خواهد بود
سه شنبه 30 بهمن 1386, 10:10 صبح
majjjj
```
 

GetDriveType
```
```
 

Private Declare Function GetDriveType Lib "kernel32.dll" (ByVal nDriev as String) As Long
```
آین تابع نوع یک درایو را مشخص می کند
با توجه به مقدار برگشتی یکی از حالت های زیر ممکن است پیش آید:
0 : تابع با خطا مواجه شده است
1 : درایو مورد نظر وجود ندارد
2 : قابل حمل(فلش مموری ها)
3 : ثابت
4 : درایو شبکه ( مشترک )
5 : رم دیسک
6 : سی دی رام
nDrive : این متغیر به مسیر درایو اشاره می کند ( برای مثال : \:d )
سه شنبه 30 بهمن 1386, 10:11 صبح
majjjj
```
 

GetFileAttributesA
```
```
 

Private Const FILE_ATTRIBUTE_ARCHIVE = &H20

Private Const FILE_ATTRIBUTE_COMPRESSED = &H800

Private Const FILE_ATTRIBUTE_DIRECTORY = &H10

Private Const FILE_ATTRIBUTE_HIDDEN = &H2

Private Const FILE_ATTRIBUTE_NORMAL = &H80

Private Const FILE_ATTRIBUTE_READONLY = &H1

Private Const FILE_ATTRIBUTE_SYSTEM = &H4

Private Const FILE_ATTRIBUTE_TEMPORARY = &H100
```
```
 

Private Declare Function GetFileAttributesA Lib "kernel32.dll" (ByVal lpFileName As String) As Long
```
این تابع خصوصیات یک فایل (Read Only,Archive,Hidden,…) را برمیگرداند ( در ویژوال بیسیک تابع GetAttr همین کار را انجام می دهد )
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر خواهد بود که بیانگر خصوصیات فایل است (ثابت های زیر به شما کمک خواهد کرد)
lpFileName : مسیر فایل مورد نظر
FILE_ATTRIBUTE_ARCHIVE : فایل آرشیو است
FILE_ATTRIBUTE_COMPRESSED : فایل فشرده است
FILE_ATTRIBUTE_DIRECTORY : فایل مورد نظر دایراکتوری است ( دایراکتوری ها در واقع یک فایل ساده هستند که بیت خصوصیت دایراکتوری آنها یک است )
FILE_ATTRIBUTE_HIDDEN : فایل مخفی
FILE_ATTRIBUTE_NORMAL : خصوصیات طبیعی
FILE_ATTRIBUTE_READONLY : فقط خواندنی
FILE_ATTRIBUTE_SYSTEM : فایل سیستمی
FILE_ATTRIBUTE_TEMPORARY : فایل موقت
سه شنبه 30 بهمن 1386, 10:12 صبح
majjjj
```
 

GetFileSize
```
```
 

Private Declare Function GetFileSize Lib "kernel32.dll" (ByVal hFile As Long, ByVal lpFileSizeHight As Long) As Long
```
این تابع حجم یک فایل را به بایت بر می گرداند
اگر تابع کار خود را با موفقیت انجام دهد مقدار بر گشتی حجم فایل و در غیر اینصورت مقدار بر گشتی 1- خواهد بود
hFile : یک اشاره گر از فایل مورد نظر ( این اشاره گر را می توانید با استفاده از تابع CreateFile ایجاد کنید )
lpFileSize : مقدار این بافر توسط تابع مقدار دهی می شود و حاوی حجم فایل مورد نظر خواهد بود
چهارشنبه 01 اسفند 1386, 08:42 صبح
majjjj
```
 

GetFocus
```
```
 

Private Declare Function GetFocus Lib "user32.dll" () As Long
```
این تابع هندل (HWnd ) پنجره دارای فوکوس را به دست می آورد
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی هندل پنجره دارای فوکوس خواهد بود
چهارشنبه 01 اسفند 1386, 11:30 صبح
majjjj
```
 

GetForegroundWindow
```
```
 

Private Declare Function GetForegroundWindow Lib "user32.dll" () As Long
```
این تابع هندل فرم پنجره را برمیگرداند.
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر خواهد بود که هندل پنجره فعال است
شنبه 04 اسفند 1386, 07:52 صبح
majjjj
```
 

GetFreeResources
```
```
 

Private Const GFSR_SYSTEMRESOURCES = 0

Private Const GFSR_GDIRESOURCES = 1

Private Const GFSR_USERRESOURCES = 2
```
```
 

Private Declare Function GetFreeResources Lib "rsrc32.dll" Alias "_MyGetFreeSystemResources32@4" (ByVal lWhat As Long) As Long
```
این تابع میزان منابع آزاد سیستمی را بر می گرداند
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی میزان آزاد منابع مورد نظر خواهد بود
lWhat : این متغیر مشخص می کند تابع باید میزان منابع آزاد کدام قسمت را بر گرداند
GFSR_SYSTEMRESOURCES : منابع آزاد سیستمی
GFSR_GDIRESOURCES : منابع آزاد گرافیکی
GFSR_USERRESOURCES : منابع آزاد کاربر
شنبه 04 اسفند 1386, 07:53 صبح
majjjj
```
 

GetKeyboardLayoutName
```
```
 

Private Declare Function GetKeyboardLayoutName Lib "user32.dll" (ByVal pwszKLID As String) As Long
```
این تابع زبان جاری صفحه کلید را بر می گرداند
اکر تابع با خطایی مواجه شود مقدار برگشتی صفر و در غیر اینصورت مقدار برگشتی آن یک مقدار غیر صفر خواهد بود
pwszKLID : این متغیر که توسط تابع مقدار دهی می شود یک رشتهء 9 کاراکتری است که کد زبان کنونی صفحه کلید است
شنبه 04 اسفند 1386, 07:55 صبح
majjjj
```
 

GetLastError
```
```
 

Private Declare Function GetLastError Lib "kernel32.dll" (ByVal dwErrCode As Long) As Long
```
این تابع شماره آخرین خطایی را که در کامپیوتر رخ داده بر می گرداند
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
dwErrCode : این بافر توسط تابع مقدار دهی می شود و حاوی شماره خطای آخرین خطای سیستمی خواهد بود

نمایش 50 پست از این تاپیک در یک صفحه

واحد زمان برحسب ساعت لندن +4. ساعت هم اکنون 09:30 صبح است.