View Full Version : مرجع تخصصی توابع api همراه با توضیح انها
majjjj
چهارشنبه 03 بهمن 1386, 13:39 عصر
با اجازه اساتید قصد معرفی تعدادی از توابع قدرتمند زبان c رو به همراه توضیح انها دارم البته تفسیرتعداد زیادی از اینها کار خودم نیست
ActivateKeyboardLayput
Private Const KL_NEXT = 1
Private Const KL_PREV = 0
Private Declare Function ActivateKeyboardLayput Lib "user32.dll" (ByVal HKL As Long , ByVal Flags As Long) As Long
این تابع زبان صفحه کلید را تغییر می دهد.
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
HKL : این آرگومان تعیین می کند باید زبان قبلی بر روی صفحه کلید اعمال شود با زبان بعدی
KL_NEXT : زبان بعدی را روی صفحه کلید اعمال می کند
KL_PREV : زبان قبلی را روی صفحه کلید اعمال می کند
Flags : مقدار این متغیر را برابر &0 قرار دهید
majjjj
چهارشنبه 03 بهمن 1386, 13:44 عصر
AddFontResourceA
Private Declare Function AddFontResourceA Lib "gdi32.dll" (ByVal lpFileName As String) As Long
این تابع یک فونت را به مجموعه فونت های ویندوز اضافه می کند.
اگر تابع مقدار صفر را برگرداند به منزلهء عدم موفقیت تابع است در غیر اینصورت عملیات افزودن فونت موفقیت آمیز بوده است.
lpFileName : این متغیر رشته ای به فایل فونت اشاره می کند
majjjj
چهارشنبه 03 بهمن 1386, 13:48 عصر
AnimateWindow
Const AW_HOR_POSITIVE = &H1
Const AW_HOR_NEGATIVE = &H2
Const AW_VER_POSITIVE = &H4
Const AW_VER_NEGATIVE = &H8
Const AW_CENTER = &H10
Const AW_HIDE = &H10000
Const AW_ACTIVATE = &H20000
Const AW_SLIDE = &H40000
Const AW_FADE = &H80000
Private Declare Function AnimateWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal dwTime As Long, ByVal dwFlags As Long) As Boolean
از این تابع برای دادن افکت های انیمیشن به یک پنجره استفاده می شود
hwnd : هندل پنجره مورد نظر
dwTime : مدت زمانی که باید عمل مورد نظر طول بکشد
dwFlags : چگونگی افکت گذاری روی پنجره را این متغیر مشخص می کند. در این باره ثابت های زیر به شما کمک خواهد کرد
AW_HOR_POSITIVE : پنجره از چپ به راست باز می شود
AW_HOR_POSITIVE : پنجره از راست به چپ باز می شود
AW_VER_POSITIVE : پنجره از بالا به پایین باز می شود
AW_VER_NEGATIVE : پنجره از پایین به بالا باز می شود
AW_SLIDE : افکت اسلاید
AW_CENTER : از وسط باز می شود
AW_ACTIVATE : پنجره را فعال می کند (این ثابت را با AW_HIDE به کار نبرید)
AW_HIDE : پنجره را مخفی می کند (این ثابت را با AW_ACTIVATE به کار نبرید)
AW_FADE : محو یا پیدایش تدریجی
majjjj
چهارشنبه 03 بهمن 1386, 13:51 عصر
AppendMenuA
Private Const MF_APPEND = &H
Private Const MF_SEPARATOR = &H
Private Const MF_DISABLED = &H
Private Const MF_GRAYED = &H
Private Const MF_CHECKED = &H
Private Const MF_BITMAP = &H
Private Declare Function AppendMenuA Lib "user32.dll" (ByVal hMenu As Long, ByVal wFlags As Long, ByVal wIdNewItem As Long, ByVal IpNewItem As Any) As Long
این تابع یک گزینه دلخواه را به انتهای یک منو می افزاید
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hMenu : یک اشاره گر از نوع منویی که قرار است ساخته شود (این اشاره گر را می توانید برای منوهای پاپ آپ با استفاده از تابع CreatePopupMenu و برای منو های عادی بوسیله توابع GetMenu و GetSubMenu و برای منو های سیستمی با استفاده از تابع GetSystemMenu به دست آورید)
wFlags : این متغیر بیانگر نوع منو است
MF_APPEND :
MF_SEPARATOR : یک خط جدا کننده می سازد
MF_DISABLED : منو را غیر فعال می کند (خاکستری نمی کند)
MF_GRAYED : منو را خاکستری می کند (غیر فعال نمی کند)
MF_CHECKED : کنار منو یک علامت چک رسم می کند
MF_BITMAP : یک منوی گرافیکی می سازد
wIdNewItem : این متغیر بیانگر ID منو است (ID دو منو در یک ردیف نباید یکسان باشد و این ID نباید صفر باشد)
IpNewItem : این متغیر عنوان منو را بیان می کند
majjjj
چهارشنبه 03 بهمن 1386, 13:55 عصر
Arc
Private Declare Function Arc Lib "gdi32.dll" (ByVal hdc As Long, ByVal nLeftRect As Long, ByVal nTopRect As Long, ByVal nRightRect As Long, ByVal nBottomRect As Long, ByVal nxStartArc As Long, ByVal nyStartArc As Long, ByVal nxEndArc As Long, ByVal nyEndArc As Long) As Long
این تابع یک کمان را بر روی یک پنجره رسم می کند (تابع برای رسم از قلم جاری استفاده می کند)
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hdc : هندل بافت گرافیکی کنترل مورد نظر
nLeftRect : مختصات x گوشه بالا-چپ محدوده کمان
nTopRect : مختصات y گوشه بالا-چپ محدوده کمان
nRightRect : مختصات x گوشه پایین-راست محدوده کمان
nBottomRect : مختصات y گوشه پایین-راست محدوده کمان
nxStartArc : مختصات x نقطه شروع کمان
nyStartArc : مختصات y نقطه شروع کمان
nxEndArc : مختصات x نقطه پایان کمان
nyEndArc : مختصات y نقطه پایان کمان
ftmotlagh
چهارشنبه 03 بهمن 1386, 13:56 عصر
اینها مال زبان C هستش ...............؟؟؟؟؟؟؟؟؟؟؟؟؟؟
majjjj
چهارشنبه 03 بهمن 1386, 13:58 عصر
اینها مال زبان C هستش ...............؟؟؟؟؟؟؟؟؟؟؟؟؟؟
پس مال vb هستن ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟:عصبانی++:
majjjj
چهارشنبه 03 بهمن 1386, 14:01 عصر
ArcTo
Private Declare Function Arc Lib "gdi32.dll" (ByVal hdc As Long, ByVal nLeftRect As Long, ByVal nTopRect As Long, ByVal nRightRect As Long, ByVal nBottomRect As Long, ByVal nxStartArc As Long, ByVal nyStartArc As Long, ByVal nxEndArc As Long, ByVal nyEndArc As Long) As Long
این تابع یک کمان را بر روی یک پنجره از نقطه فعال (محلی که آخرین ترسیم در آنجا قطع شده است) رسم می کند (تابع برای رسم از قلم جاری استفاده می کند)
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hdc : هندل بافت گرافیکی کنترل مورد نظر
nLeftRect : مختصات x گوشه بالا-چپ محدوده کمان
nTopRect : مختصات y گوشه بالا-چپ محدوده کمان
nRightRect : مختصات x گوشه پایین-راست محدوده کمان
nBottomRect : مختصات y گوشه پایین-راست محدوده کمان
nxStartArc : مختصات x نقطه شروع کمان
nyStartArc : مختصات y نقطه شروع کمان
nxEndArc : مختصات x نقطه پایان کمان
nyEndArc : مختصات y نقطه پایان کمان
majjjj
چهارشنبه 03 بهمن 1386, 14:02 عصر
auxGetNumDevs
Private Declare Function auxGetNumDevs Lib "winmm.dll" () As Long
این تابع تعداد سخت افزار های پخش صوت موجود در کامپیوتر را بر می گرداند (تابع تعداد کارت های صوتی را بر می گرداند نه تعداد بلندگو ها را)
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی تعداد سخت افزار های پخش صوت خواهد بود
majjjj
چهارشنبه 03 بهمن 1386, 14:05 عصر
Beep
Private Declare Function Beep Lib "kernel32.dll" (ByVal dwFreq As Long,ByVal dwDuration As Long) As Long
این تابع یک صوت کوتاه (Beep) را از کارت صوتی پخش می کند
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
dwFreq : فرکانس صوت (در ویندوز های 95 و 98 و ME تاثیری ندارد)
dwDuration : مدت زمان پخش صوت بر حسب میلی ثانیه (در ویندوز های 95 و 98 و ME تاثیری ندارد)
majjjj
چهارشنبه 03 بهمن 1386, 14:07 عصر
BitBlt
Private Const SRC_PAINT = &HEE0086
Private Const SRC_ERASE = &H440328
Private Const SRC_INVERT = &H660046
Private Const SRC_AND = &H8800C6
Private Const SRC_COPY = &HCC0020
Private Declare Function BitBlt Lib "gdi32.dll" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal XSrc As Long, ByVal YSrc As Long, ByVal dwRop As Long) As Long
این تابع از یک پنجره عکس می گیرد و آن را در یک کنترل گرافیکی چاپ می کند.
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hdc : هندل بافت گرافیکی کنترلی مقصد
x : نقطه شروع ترسیم عکس جدید در راستای افق
y : نقطه شروع ترسیم عکس جدید در راستای عمود
nWidth : عرض تصویر جدید
nHeight : ارتفاع تصویر جدید
hSrcDC : هندل بافت گرافیکی کنترلی که باید از آن عکس گرفته شود
xSrc : فاصلهء تصویر از سمت چپ کنترل
ySrc : فاصلهء تصویر از بالای کنترل
dwRop : نحوه ترسیم تصویر . ثابت های زیر
SRC_PAINT : تصویر کنترل مبدا و مقصد را با هم Or کرده و در کنترل مقصد قرار می دهد
SRC_ERASE : تصویر پنجره مقصد را Not کرده و با پنجره مبدا Or می کند و نتیجه را در کنترل مقصد می نویسد
SRC_INVERT : تصویر کنترل مبدا و مقصد را با هم Xor کرده و در کنترل مقصد قرار می دهد
SRC_AND : تصویر کنترل مبدا و مقصد را با هم And کرده و در کنترل مقصد قرار می دهد
SRC_COPY : تصویر کنترل مبدا رو بدون دستکاری در کنترل مقصد قرار می دهد
majjjj
چهارشنبه 03 بهمن 1386, 14:08 عصر
BlockInput
Private Declare Function BlockInput Lib "user32.dll" (ByVal fBlock As Long) As Long
این تابع ماوس و صفحه کلید را قفل می کند.
برای آزادسازی صفحه کلید شما باید در برنامه خود تمهیداتی بیندیشید چون کاربر توانایی برگرداندن تغییرات را ندارد. برای مثال می توانید یک تایمر داشته باشید تا بعد از مدتی معلوم ماوس و صفحه کلید دوباره آزاد شود.
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
fBlock : اگر مقدار این آرگومان True باشد ماوس و صفحه کلید قفل می شود ، و اگر مقدار آن False باشد ماوس و صفحه کلید آزاد می شود
ftmotlagh
چهارشنبه 03 بهمن 1386, 14:09 عصر
من نفهمیدم مال سی یا وی بی
majjjj
چهارشنبه 03 بهمن 1386, 14:19 عصر
من نفهمیدم مال سی یا وی بی
اینها توابع سی هستن که تو بیسیک invoke میشن
mononok
چهارشنبه 03 بهمن 1386, 17:59 عصر
اینها توابع سی هستن که تو بیسیک invoke میشن
ببخشید ولی basic با visual basic فرق داره ......
اگر منظورتون visual basic هست می شه توضیح بدید invoke یعنی چه؟:لبخندساده:
majjjj
پنج شنبه 04 بهمن 1386, 09:58 صبح
ببخشید ولی basic با visual basic فرق داره ......
اگر منظورتون visual basic هست می شه توضیح بدید invoke یعنی چه؟:لبخندساده:
:عصبانی++:
دوست عزیز منظور من هم همون vb در ضمن اگه یک دیکشنری بخرید بد نیست.
معنی کلمه فوق الذکر به معنی فراخوانی است .
majjjj
پنج شنبه 04 بهمن 1386, 10:02 صبح
ClientToScreen
Private Type POINTAPI
x As Long
y As Long
End Type
Private Declare Function ClientToScreen Lib "gdi32.dll" (ByVal hwnd As Long, ByVal lpPoint As POINTAPI) As Long
این تابع مختصات یک نقطه را در یک پنجره می گیرد و مختصات همان نقطه را در صفحه نمایش می دهد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hwnd : هندل پنجره مورد نظر
lpPoint : مختصات نقطه مورد نظر از نوع POINTAPI ( مختصات داده شده باید بر حسب پیکسل باشد )
majjjj
پنج شنبه 04 بهمن 1386, 10:04 صبح
ClipCursor
Private Type RECT
left As Long
top As Long
right As Long
bottom As Long
End Type
Private Declare Function ClipCursor Lib "user32.dll" (lpRect As Any) As Long
این تابع ماوس را در یک چهار گوش محصور می کند تا حرکت ماوس در آن منطقه محدود باشد.
برای لغو انحصار ماوس تابع را با آرگومان &0 اجرا کنید ( ClipCursor &0 ).
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
RECT : این نوع به محدوده ای که ماوس باید در آن محصور باشد اشاره می کند
majjjj
پنج شنبه 04 بهمن 1386, 10:05 صبح
CloseClipboard
Private Declare Function CloseClipboard Lib "user32.dll" () As Long
این تابع کلیپ بورد را که توسط تابع OpenClipboard قفل شده ، باز می کند تا برنامه های دیگر بتوانند به آن دسترسی داشته باشند.
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
majjjj
پنج شنبه 04 بهمن 1386, 10:08 صبح
CloseWindow
Private Declare Function CloseWindow Lib "user32.dll" (ByVal hWnd As Long) As Long
این تابع پنجره مشخص شده را به حالت Minimize می برد.
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hWnd : این متغیر هندل پنجره ای است که باید کمینه شود
majjjj
پنج شنبه 04 بهمن 1386, 10:09 صبح
CombinRgn
Private Const RGN_AND = 1
Private Const RGN_OR = 2
Private Const RGN_XOR = 3
Private Const RGN_DIFF = 4
Private Const RGN_COPY = 5
Private Declare Function CombinRgn Lib "gdi32.dll" (ByVal HDesRgn As Long, ByVal hSrcRgn1 As Long, ByVal hSrcRgn2 As Long, ByVal nCombinMode As Long) As Long
این تابع دو محدوده را با یک دیگر ترکیب می کند و یک محدوده جدید می سازد
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و در غیر اینصورت مقدار بازگشتی یک اشاره گر از محدوده ساخته شده خواهد بود
HDesRgn : یک اشاره گر از ناحیه ای که محدوده ترکیب شده باید در آن جا ساخته شود
hSrcRgn1 : یک اشاره گر از محدوده اول
hSrcRgn2 : یک اشاره گر از محدوده دوم
nCombinMode : نحوه ترکیب دو محدوده
RGN_AND : دو محدوده را با یکدیگر جمع می کند
RG_OR : ناحیه مشترک دو ناحیه را بر می گرداند
RGN_XOR : محدوده جمع دو ناحیه به غیر از ناحیه مشترک آن دو را بر می گرداند
RGN_DIFF : ناحیه دوم را از ناحیه اول کم می کند
RGN_COPY : کل ناحیه اول را بر می گرداند
majjjj
پنج شنبه 04 بهمن 1386, 10:11 صبح
CopyFileA
Private Declare Function CopyFileA Lib "kernel32.dll" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As long) As Long
این تابع از یک فایل موجود یک کپی تهیه می کند
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
lpExistingFileName : آدرس فایل مقصد
lpNewFileName : آدرس فایل جدید (مبدا)
bFailIfExists : این متغیر مشخص می کند در صورت وجود فایل مقصد عملیات کپی ادامه یابد یا نه اگر صفر باشد انجام میشود و اگر یک باشد انجام نمی شود
majjjj
پنج شنبه 04 بهمن 1386, 10:12 صبح
CreateCaret
Private Declare Function CreateCaret Lib "user32.dll" (ByVal hwnd As Long, ByVal hBitmap As Long, ByVal nWidth As Long, ByVal nHeight As Long) As Long
این تابع یک تصویر را به جای چشمک زن فعلی پنجره مورد نظر قرار می دهد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hwnd : هندل پنجره (کنترل) مورد نظر
hBitmap : تصویر مورد نظر ( می توانید این تصویر را با استفاده از تابع CreateBitmap بسازید )
nWidth : عرض تصویر مورد نظر
nHeight : طول تصویر مورد نظر
majjjj
پنج شنبه 04 بهمن 1386, 11:38 صبح
CreateDirectoryA
Private Declare Function CreateDirectoryA Lib "kernel32.dll" (ByVal lpPathName As String, ByVal lpSecurityAttributes As Long) As Long
این تابع یک فولدر جدید در محل داده شده ایجاد می کند ( پوشه والد پوشه جدید باید موجود باشد )
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی یک اشاره گر از قلم ساخته شده خواهد بود
lpPathName : نام و مسیر پوشه ای که باید ساخته شود
lpSecurityAttributes : مقدار این متغیر را برابر صفر قرار دهید
majjjj
پنج شنبه 04 بهمن 1386, 11:40 صبح
CreateEllipticRgn
Private Declare Function CreateEllipticRgn Lib "gdi32.dll" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
این تابع یک محدوده بیضی می سازد ( برای این کار تابع محدوده یک مستطیل را از شما می گیرد و بزرگ ترین بیضی ممکن را در درون این مستطیل می سازد )
اگر تابع کار خود را با موفقیت انجام دهد مقدار بر گشتی یک اشاره گر از محدوده ساخته شده و در غیر اینصورت مقدار بر گشتی صفر خواهد بود
X1 : مختصات X گوشه بالا سمت چپ
Y1 : مختصات y گوشه بالا سمت چپ
X2 : مختصات X گوشه پایین سمت راست
Y2 : مختصات y گوشه پایین سمت راست
mononok
پنج شنبه 04 بهمن 1386, 16:50 عصر
دوست عزیز منظور من هم همون vb در ضمن اگه یک دیکشنری بخرید بد نیست.
معنی کلمه فوق الذکر به معنی فراخوانی است .
من قصد اذیت نداشتم...ولی تا به حال این اصطلاح رو در visual basic نشنیده بودم...
ممنون که گفتید.
majjjj
شنبه 06 بهمن 1386, 09:40 صبح
CreatePatternBrush
Private Declare Function CreatePatternBrush Lib "gdi32.dll" (ByVal hBitmap As Long) As Long
این تابع یک قلم با الگوی تصویر برای استفاده در توابع گرافیکی می سازد
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی یک اشاره گر از قلم ساخته شده خواهد بود
hBitmap : یک اشاره گر از تصویر مورد نظر ( می توانید از نوع stdPicture موجود در ویژوال بیسیک مثل پروپرتی Picture موجود در PictureBox و غیره استفاده کنید )
majjjj
شنبه 06 بهمن 1386, 12:59 عصر
CreatePen
Private Declare Function CreatePen Lib "gdi32.dll" (ByVal nPenStyle As BorderStyleConstants, ByVal nWidth As Long, ByVal crColor As Long) As Long
این تابع یک قلم با استیل و عرض و رنگ دلخواه برای استفاده در توابع گرافیکی می سازد
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی یک اشاره گر از قلم ساخته شده خواهد بود
nPenStyle : استیل قلم ( برای راحتی کار این متغیر را از نوع BorderStyleConstants تعریف کردم تا کار کردن با آن ملموس تر و آسان تر باشد )
nWidth : عرض قلم
crColor : رنگ قلم به فرم RGB (میتوانید از ثابت های ColorConstants مثل : vbRed و vbBlue و غیره استفاده کنید )
majjjj
شنبه 06 بهمن 1386, 13:02 عصر
CreatePolygonRgn
Private Const ALTERNATE = 1
Private Const WINDING = 2
Private Type COORD
x As Long
y As Long
End Type
Private Declare Function CreatePolygonRgn Lib "gdi32.dll" (lpPoint Any, ByVal nCount As Long, ByVal nPolyFillMode As Long) As Long
این تابع یک محدوده چند ضلعی می سازد
اگر تابع کار خود را با موفقیت انجام دهد مقدار بر گشتی یک اشاره گر از محدوده ساخته شده و در غیر اینصورت مقدار بر گشتی صفر خواهد بود
lpPoint : این متغیر یک آرایه از نوع COORD است که مختصات نقاط چند ضلعی را نگه می دارد ( اولین عضو آرایه را وارد کنید. برای مثال : (COORDArray(0 )
nCount : تعداد اعضای آرایه
nPolyFillMode : نحوه ساخت چند ضلعی
majjjj
شنبه 06 بهمن 1386, 13:04 عصر
CreatePopupMenu
Private Declare Function CreatePopupMenu Lib "user32.dll" () As Long
این تابع یک منوی شناور (پاپ آپ) ایجاد می کند. به وسیله توابع دیگر می توان به این منو آیتم اضافه کرد
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی هندل منوی ایجاد شده خواهد بود
majjjj
شنبه 06 بهمن 1386, 13:05 عصر
CreateRectRgn
Private Declare Function CreateRectRgn Lib "gdi32.dll" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
این تابع یک محدوده چهار گوش می سازد
اگر تابع کار خود را با موفقیت انجام دهد مقدار بر گشتی یک اشاره گر از محدوده ساخته شده و در غیر اینصورت مقدار بر گشتی صفر خواهد بود
X1 : مختصات X گوشه بالا سمت چپ
Y1 : مختصات y گوشه بالا سمت چپ
X2 : مختصات X گوشه پایین سمت راست
Y2 : مختصات y گوشه پایین سمت راست
majjjj
شنبه 06 بهمن 1386, 13:07 عصر
CreateRoundRectRgn
Private Declare Function CreateRoundRectRgn Lib "gdi32.dll" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long, ByVal X3 As Long, ByVal Y3 As Long) As Long
این تابع یک محدوده چهار گوش با گوشه های پخ می سازد
اگر تابع کار خود را با موفقیت انجام دهد مقدار بر گشتی یک اشاره گر از محدوده ساخته شده و در غیر اینصورت مقدار بر گشتی صفر خواهد بود
X1 : مختصات X گوشه بالا سمت چپ
Y1 : مختصات y گوشه بالا سمت چپ
X2 : مختصات X گوشه پایین سمت راست
Y2 : مختصات y گوشه پایین سمت راست
X3 : میزان پخ شدن گوشه ها در راستای X
Y3 : میزان پخ شدن گوشه ها در راستای Y
majjjj
شنبه 06 بهمن 1386, 13:08 عصر
DecryptFileA
Private Declare Function DecryptFileA Lib "advapi32.dll" (ByVal lpFileName As String, ByVal dwReserved As Long) As Boolean
این تابع یک فایل را که با تابع EncryptFileA رمز گذاری شده است را به حالت عادی بر می گرداند
این تابع بر روی سیستم فایلی ntfs کار می کند و کاربر باید اختیارات لازم برای این کار را داشته باشد
lpFileName : نام فایل رمز گذاری شده
dwReserved : مقدار این متغیر صفر است
majjjj
یک شنبه 07 بهمن 1386, 12:41 عصر
DeleteFileA
[/CODE
[CODE]
Public Declare Function DeleteFile Lib "kernel32.dll" (ByVal lpFileName As String) As Long
این تابع یک فایل را از هارد دیسک پاک می کند
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
lpFileName : این متغیر بیانگر مسیر فایلی است که باید پاک شود
majjjj
یک شنبه 07 بهمن 1386, 14:09 عصر
DestroyIcon
Private Declare Function DestroyIcon Lib "user32.dll" (ByVal hIcon As Long) As Long
این تابع فضای اشغال شده توسط یک آیکون را آزاد می کند و در واقع آیکون مزبور را آزاد می کند
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hIcon : یک اشاره گر از آیکون مورد نظر
majjjj
یک شنبه 07 بهمن 1386, 14:10 عصر
DestroyMenu
Private Declare Function DestroyMenu Lib "user32.dll" () As Long
این تابع حافظه اشغال شده توسط اشاره گر یک منو را آزاد می کند و در واقع منوی مزبور را از بین می برد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
majjjj
چهارشنبه 10 بهمن 1386, 09:22 صبح
DestroyWindow
Private Declare Function DestroyWindow Lib "user32.dll" (ByVal hwnd As Long) As Long
این تابع یک پنجره را مخفی می کند و ارتباط آن را با سایر پروسه ها قطع می کند ولی برنامه Unload نمی شود
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hwnd : هندل پنجره مورد نظر
majjjj
چهارشنبه 10 بهمن 1386, 09:24 صبح
DoFileDownload
Private Declare Function DoFileDownload Lib "shdocvw.dll" (ByVal lpszFile As String) As Long
این تابع پنجرهء File Download را برای گرفتن یک فایل مشخص باز می کند.
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
lpszFile : این متغیر به نام فایل که باید دانلود شود اشاره می کند
majjjj
چهارشنبه 10 بهمن 1386, 09:25 صبح
DrawCaption
Private Const DC_ACTIVATE = &H1
Private Const DC_NOACTIVATE = &H2
Private Const DC_ICON = &H4
Private Const DC_TEXT = &H8
Private Const DC_GRADIENT = &H20
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Private Declare Function DrawCaption Lib "user32.dll" (ByVal hwnd As Long, ByVal hdc As Long, pcRect As RECT, ByVal un As Long) As Long
این تابع از عنوان یک پنجره یک کپی تهیه می کند و آن را در یک کنترل گرافیکی نمایش میدهد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hwnd : هندل پنجره مورد نظر
hdc : هندل بافت گرافیکی مورد نظر
pcRect : محدوده ای که باید به اندازه آن از Titlebar کپی تهیه شود
un : این متغیر نوع کپی کردن را مشخص می کند (اگر به چند خصوصیت نیاز داشتید با عملگر OR آنها را با یکدیگر جمع کنید)
DC_ACTIVATE : پنجره را به حالت فعال ترسیم می کند
DC_NOACTIVATE : پنجره را به حالت غیر فعال ترسیم می کند
DC_ICON : آیکون پنجره را نیز ترسیم می کند
DC_TEXT : متن پنجره را نیز ترسیم می کند
DC_GRADIENT : محو تدریجی روی پنجره را نیز ترسیم می کند
mhh_etefagh
چهارشنبه 10 بهمن 1386, 09:39 صبح
این سایت هم تمام توابع API مربوط به VB در Win32.dll را کاملا معرفی کرده. ببینید خوبه...
http://www.ex-designz.net/apicat.asp?
majjjj
پنج شنبه 11 بهمن 1386, 11:46 صبح
فارسی نیست ولی خوبه
اوبالیت به بو
شنبه 13 بهمن 1386, 12:57 عصر
شما تابع API سراغ ندارین که بوسیله اون بشه Zoom تصویر رو انجام داد.
مثلاً رویه یه ImageBox بشه Zoom کرد.
majjjj
شنبه 13 بهمن 1386, 13:10 عصر
شما تابع API سراغ ندارین که بوسیله اون بشه Zoom تصویر رو انجام داد.
مثلاً رویه یه ImageBox بشه Zoom کرد.
StretchBlt
Private Const SRC_PAINT = &HEE0086
Private Const SRC_ERASE = &H440328
Private Const SRC_INVERT = &H660046
Private Const SRC_AND = &H8800C6
Private Const SRC_COPY = &HCC0020
Private Declare Function StretchBlt Lib "gdi32"(ByVal hdc As Long,ByVal x As Long,ByVal y As Long,ByVal nWidth As Long,ByVal nHeight As Long,ByVal hSrcDC As Long,ByVal xSrc As Long,ByVal ySrc As Long,ByVal nSrcWidth As Long,ByVal nSrcHeight As Long,ByVal dwRop As Long)As Long
این تابع از یک پنجره عکس می گیرد و آن را در یک کنترل گرافیکی چاپ می کند ضمن آنکه توانایی بزرگنمایی و کوچکنمایی تصویر را هم دارد
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hdc : هندل بافت گرافیکی کنترلی مقصد
x : نقطه شروع ترسیم عکس جدید در راستای افق
y : نقطه شروع ترسیم عکس جدید در راستای عمود
nWidth : عرض تصویر جدید
nHeight : ارتفاع تصویر جدید
hSrcDC : هندل بافت گرافیکی کنترلی که باید از آن عکس گرفته شود
xSrc : فاصلهء تصویر از سمت چپ کنترل
ySrc : فاصلهء تصویر از بالای کنترل
nSrcWidth : عرض تصویر
nSrcHeight : ارتفاع تصویر
dwRop : نحوه ترسیم تصویر . ثابت های زیر
SRC_PAINT : تصویر کنترل مبدا و مقصد را با هم Or کرده و در کنترل مقصد قرار می دهد
SRC_ERASE : تصویر پنجره مقصد را Not کرده و با پنجره مبدا Or می کند و نتیجه را در کنترل مقصد می نویسد
SRC_INVERT : تصویر کنترل مبدا و مقصد را با هم Xor کرده و در کنترل مقصد قرار می دهد
SRC_AND : تصویر کنترل مبدا و مقصد را با هم And کرده و در کنترل مقصد قرار می دهد
SRC_COPY : تصویر کنترل مبدا رو بدون دستکاری در کنترل مقصد قرار می دهد
اوبالیت به بو
شنبه 13 بهمن 1386, 13:16 عصر
چی جوری من باید عمل Zoom رو بوسیله این تابع انجام بدم؟
majjjj
شنبه 13 بهمن 1386, 14:07 عصر
چی جوری من باید عمل Zoom رو بوسیله این تابع انجام بدم؟
http://amozesheiranian.blogsky.com/
majjjj
یک شنبه 14 بهمن 1386, 13:27 عصر
DrawFocusRect
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Private Declare Function DrawFocusRect Lib "user32.dll" (ByVal hdc As Long, ByVal lpRect As RECT) As Long
این تابع چهار چوب فوکوس را بر روی یک پنجره ترسیم می کند
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hdc : هندل بافت گرافیکی کنترل مورد نظر
lpRect : محدوده ای که باید فریم در آن ترسیم شود
majjjj
سه شنبه 16 بهمن 1386, 11:00 صبح
DrawIcon
Private Declare Function DrawIcon Lib "user32.dll" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal hIcon As Long) As Long
این تابع چهار چوب فوکوس را بر روی یک پنجره ترسیم می کند
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hdc : هندل بافت گرافیکی کنترل مورد نظر
lpRect : محدوده ای که باید فریم در آن ترسیم شود
majjjj
سه شنبه 16 بهمن 1386, 11:02 صبح
DrawTextA
Const DT_LEFT = &H0
Const DT_TOP = &H0
Const DT_CENTER = &H1
Const DT_RIGHT = &H2
Const DT_BOTTOM = &H8
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Private Declare Function DrawTextA Lib "user32.dll" (ByVal hdc As Long, ByVal lpStr As String, ByVal nCount As Long, lpRect As RECT, ByVal wFormat As Long) As Long
این تابع توانایی چاپ یک متن را رو ی یک پنجره دارد.
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hdc : هندل بافت گرافیکی پنجره مورد نظر
lpStr : متن مورد نظر
nCount : طول متن مورد نظر
lpRect : چهار چوبی که باید متن در آن نمایش یابد
wFormat : فرمتی متن باید تحت آن نمایش یابد. ثابت های زیر به شما کمک خواهد کرد ( شما می توانید مقادیر زیر را با هم Or کنید )
DT_LEFT : متن در سمت چپ محدوده rect چاپ می شود
DT_LEFT : متن در بالای محدوده rect چاپ می شود
DT_CENTER : متن در وسط محدوده rect چاپ می شود
DT_RIGHT : متن سمت راست محدوده rect چاپ می شود
DT_BOTTOM : متن در پایین محدوده rect چاپ می شود
majjjj
سه شنبه 16 بهمن 1386, 11:04 صبح
DrawMenuBar
Private Declare Function DrawMenuBar Lib "user32.dll" (ByVal hwnd As Long) As Long
بعد از اینکه تغییراتی در منوهای یک پنجره داده شد با استفاده از این تابع می توان تغییرات را بر روی پنجره مورد نظر اعمال کرد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hwnd : هندل پنجره مورد نظر
majjjj
سه شنبه 16 بهمن 1386, 11:53 صبح
DuplicateIcon
Private Declare Function DuplicateIcon Lib "shell32.dll" (ByVal hInst As Long, ByVal hIcon As Long) As Long
این تابع توانایی چاپ یک متن را رو ی یک پنجره دارد.
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hdc : هندل بافت گرافیکی پنجره مورد نظر
lpStr : متن مورد نظر
nCount : طول متن مورد نظر
lpRect : چهار چوبی که باید متن در آن نمایش یابد
wFormat : فرمتی متن باید تحت آن نمایش یابد. ثابت های زیر به شما کمک خواهد کرد ( شما می توانید مقادیر زیر را با هم Or کنید )
DT_LEFT : متن در سمت چپ محدوده rect چاپ می شود
DT_LEFT : متن در بالای محدوده rect چاپ می شود
DT_CENTER : متن در وسط محدوده rect چاپ می شود
DT_RIGHT : متن سمت راست محدوده rect چاپ می شود
DT_BOTTOM : متن در پایین محدوده rect چاپ می شود
majjjj
سه شنبه 16 بهمن 1386, 11:55 صبح
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 : یک اشاره گر از آیکون مبدا
majjjj
سه شنبه 16 بهمن 1386, 11:57 صبح
EmptyClipboard
Private Declare Function EmptyClipboard Lib "user32.dll" () As Long
این تابغ داده های موجود در کلیپ بورد ویندوز را پاک می کند ( در ویژوال بیسیک دستور Clipboard.Clear همین کار را انجام می دهد)
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
majjjj
سه شنبه 16 بهمن 1386, 11:58 صبح
EnableWindow
Private Declare Function EnableWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal fEnabled As Long) As Long
این تابع یک پنجره ( فرم یا کنترل ) را فعال یا غیرفعال می کند
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hwnd : هندل پنجره مورد نظر
fEnabled : اگر صفر باشد پنجره غیر فعال و اگر یک باشد پنجره فعال می شود
majjjj
سه شنبه 16 بهمن 1386, 11:59 صبح
EncryptFileA
Private Declare Function EncryptFileA Lib "advapi32.dll" (ByVal lpFileName As String) As Boolean
این تابع یک فایل را رمز گذاری می کند. فایل رمز گذاری شده را می توان با تابع DecryptFileA به حالت عادی باز گرداند
این تابع بر روی سیستم فایلی ntfs کار می کند و کاربر باید اختیارات لازم برای این کار را داشته باشد
lpFileName : نام فایل رمز گذاری شده
majjjj
سه شنبه 16 بهمن 1386, 12:00 عصر
EndMenu
Private Declare Function EndMenu Lib "user32.dll" () As Long
این تابع تمام منوهای باز پنجره جاری را می بندد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
majjjj
سه شنبه 16 بهمن 1386, 12:04 عصر
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 ارسال خواهد شد
majjjj
سه شنبه 16 بهمن 1386, 12:06 عصر
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 ارسال خواهد شد
majjjj
چهارشنبه 17 بهمن 1386, 12:19 عصر
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& است
majjjj
چهارشنبه 17 بهمن 1386, 12:20 عصر
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 : شماره آیکون مورد نظر
majjjj
چهارشنبه 17 بهمن 1386, 12:22 عصر
FatalAppExitA
Private Declare Sub FatalAppExitA Lib "kernel32.dll" (ByVal uAction As Long, ByVal lpMessageText As String)
این تابع یک پیغام اخطار به کاربر نشان می دهد سپس به اجرای برنامه خاتمه می دهد. از این تابع زمانی استفاده می شود که برنامه با خطایی مواجه شود و شما از Unload کردن کامل برنامه مطمئن نباشید
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
uAction : مقدار این متغیر صفر است
lpMessageText : متنی که باید به کاربر نشان داده شود. این متن نباید از 35 کاراکتر بیشتر باشد
majjjj
چهارشنبه 17 بهمن 1386, 12:24 عصر
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 :
majjjj
چهارشنبه 17 بهمن 1386, 12:27 عصر
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 )
majjjj
چهارشنبه 17 بهمن 1386, 12:28 عصر
FindWindowA
Private Declare Function FindWindowA Lib "user32.dll" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
این تابع یک پنجره با مشخصات داده شده را پیدا می کند
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و در غیر اینصورت مقدار بازگشتی هندل پنجره مورد نظر خواهد بود
lpClassName : نام کلاس پنجره مورد نظر
lpWindowName : نوشته یا Caption مورد نظر
( توجه : هر کدام از متغیر ها را که نخواستید مقدار دهی کنید با ثابت vbNullString جایگزین کنید )
majjjj
چهارشنبه 17 بهمن 1386, 12:30 عصر
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 مقدار دهی کنید)
majjjj
چهارشنبه 17 بهمن 1386, 12:31 عصر
FlashWindow
Private Declare Function FlashWindow Lib "user32.dll" (ByVal hwnd As Long, bInvert As Long) As Long
این تابع پنجره و نشانهء آن بر روی Task Bar را فلش می کند ( به حالت چشمک زن در می آورد)
اگر قبل از فراخوانی پنجره فعال باشد تابع مقدار غیر صفر را بر می گرداند در غیر اینصورت مقدار بر گشتی تابع صفر خواهد بود
hwnd : هندل پنجره مورد نظر
bInvert : مدت زمانی که پنجره باید های لایت بماند (برحسب میلی ثانیه)
majjjj
چهارشنبه 17 بهمن 1386, 12:33 عصر
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
این تابع عنوان یک پنجره را به حالت چشمک زن در می آورد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
majjjj
چهارشنبه 17 بهمن 1386, 12:34 عصر
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 : رنگی که تابع تا رسیدن به آن رنگ محدوده مورد نظر را رنگ آمیزی می کند
majjjj
چهارشنبه 17 بهمن 1386, 12:37 عصر
GetActivateWindow
Private Declare Function GetActivateWindow Lib "user32.dll" () As Long
این تابع هندل پنجره (فرم) فعال را بر می گرداند
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی هندل پنجره فعال خواهد بود
majjjj
پنج شنبه 18 بهمن 1386, 10:31 صبح
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 : هندل فرم مادر پنجره داده شده را به دست می آورد
majjjj
پنج شنبه 18 بهمن 1386, 10:32 صبح
GetBkColor
Private Declare Function GetBkColor Lib "gdi32.dll" Alias "GetBkColor" (ByVal hdc As Long) As Long
این تابع رنگ پس زمینه یک کنترل گرافیکی را بر می گرداند
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
majjjj
پنج شنبه 18 بهمن 1386, 10:33 صبح
GetCaretBlinkTime
Private Declare Function GetCaretBlinkTime Lib "user32.dll" (ByVal wMSeconds As Long) As Long
این تابع سرعت چشمک زدن نشانگر صفحه کلید را به دست می آورد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
majjjj
شنبه 20 بهمن 1386, 14:18 عصر
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
majjjj
یک شنبه 21 بهمن 1386, 10:51 صبح
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
علی خدایاری
شنبه 27 بهمن 1386, 00:06 صبح
من میخوام یک منو طراحی کنم اما تو نمایش اون مشکل دارم. یعنی نمیتونم طوری نمایش بدم که کاربر وقتی جای دیگه کلیک میکنه منو پاک بشه (خاصیت اصلی منوها) میشه کد این کار رو قرار بدید؟ ممنونم
majjjj
شنبه 27 بهمن 1386, 09:14 صبح
دوست عزیز اینجا مرجع api هست لطفا سوال خود را دریک تایپیک جدید مطرح فرمایید
با این وجود یک نمونه تو تایپیک بعدی براتون گذاشتم البته دلیلش هم این بود که
نشد سورس رو اینجا بگذارم
majjjj
شنبه 27 بهمن 1386, 10:51 صبح
این نمونه رو ببینین
majjjj
شنبه 27 بهمن 1386, 11:55 صبح
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)
majjjj
شنبه 27 بهمن 1386, 11:56 صبح
GetCommandLine
Private Declare Function GetCommandLine Lib "kernel32.dll" () As Long
این تابع یک اشاره گر از فایل اجرایی برنامه جاری بر می گرداند
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و در غیر اینصورت مقدار بازگشتی یک اشاره گر از فایل اجرایی جاری خواهد بود
majjjj
شنبه 27 بهمن 1386, 11:57 صبح
GetComputerNameA
Private Declare Function GetComputerNameA Lib "kernel32.dll" (ByVal lpBuffer As String, nSize As Long) As Long
این تابع نام کامپیوتری که برنامه را اجرا میکند را برمیگرداند .
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و در غیر اینصورت مقدار بر گشتی صفر خواهد بود
lpBuffer : این متغیر که توسط تابع مقداردهی می شود حاوی کلاس پنجره مورد نظر خواهد بود
nSize : طول بافر lpBuffer
majjjj
شنبه 27 بهمن 1386, 12:00 عصر
GetCurrentDirectory
Private Declare Function GetCurrentDirectory Lib "kernel32.dll" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
این تابع آدرس مسیر جاری را برمیگرداند
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر خواهد بود که هندل پنجره فعال است
nBufferLength : طول بافر lpBuffer
lpBuffer : مقدار این بافر توسط تابع مقدار دهی می شود و حاوی مسیر جاری خواهد بود
علی خدایاری
یک شنبه 28 بهمن 1386, 00:46 صبح
این نمونه رو ببینین
از پاسختون ممنونم. اگه لطف کنید و این کار رو با یا UserControl انجام بدید ممنون میشم.
چون قرار منو رو من طراحی کنم.
در مورد فرمایشتون هم باید عرض کنم که این کار را انجام دادم ولی کسی پاسخ نداد
باز هم ممنونم:تشویق::تشویق:
m_vb1386
دوشنبه 29 بهمن 1386, 11:24 صبح
از پاسختون ممنونم. اگه لطف کنید و این کار رو با یا UserControl انجام بدید ممنون میشم.
چون قرار منو رو من طراحی کنم.
در مورد فرمایشتون هم باید عرض کنم که این کار را انجام دادم ولی کسی پاسخ نداد
باز هم ممنونم:تشویق::تشویق:
چرا این کار رو با ادیتور بیسیک انجام نمیدین
Mbt925
دوشنبه 29 بهمن 1386, 12:19 عصر
از پاسختون ممنونم. اگه لطف کنید و این کار رو با یا UserControl انجام بدید ممنون میشم.
چون قرار منو رو من طراحی کنم.
در مورد فرمایشتون هم باید عرض کنم که این کار را انجام دادم ولی کسی پاسخ نداد
باز هم ممنونم:تشویق::تشویق:
شرکت vbaccelerator یه Dll اه فوق العاده خوب و انعطاف پذیر برای ایجاد منو های PopUp ایجاد کرده ، که هر قابلیتی که فکرش رو بکنین ، داره.
نمونه ی ساده و قابل فهمی هم قرار داده:
http://www.vbaccelerator.com/home/VB/code/Controls/Menus/Popup_Menu_ActiveX_DLL/article.asp
majjjj
دوشنبه 29 بهمن 1386, 12:28 عصر
شرکت vbaccelerator یه Dll اه فوق العاده خوب و انعطاف پذیر برای ایجاد منو های PopUp ایجاد کرده ، که هر قابلیتی که فکرش رو بکنین ، داره.
نمونه ی ساده و قابل فهمی هم قرار داده:
امیدوارم با پاسخ مدیر بخش مشکلتون حل شده باشه
majjjj
دوشنبه 29 بهمن 1386, 12:31 عصر
GetCurrentProcess
Private Declare Function GetCurrentProcess Lib "kernel32.dll" () As Long
این تابع یک اشاره گر از پردازش فعلی (فایل اجرایی برنامه) بر می گرداند
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
majjjj
سه شنبه 30 بهمن 1386, 10:36 صبح
GetCurrentProcessId
Private Declare Function GetCurrentProcessId Lib "kernel32.dll" () As Long
این تابع یک ID از فایل اجرایی جاری بر می گرداند. این ID می تواند در توابعی مانند RegisterServiceProcess به کار رود
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و در غیر اینصورت مقدار بازگشتی ID فایل اجرایی جاری خواهد بود
majjjj
سه شنبه 30 بهمن 1386, 10:37 صبح
GetCursor
Private Declare Function GetCursor Lib "user32.dll" () As Long
این تابع یک اشاره گر از کرسر فعلی بر می گرداند. از این اشاره گر می توان در توابع کار با آیکون ها استفاده کرد
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی یک اشاره گر از کرسر فعلی خواهد بود
majjjj
سه شنبه 30 بهمن 1386, 10:39 صبح
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 خواهد بود
majjjj
سه شنبه 30 بهمن 1386, 10:59 صبح
GetDefaultUserProfileDirectoryA
Private Declare Function GetDefaultUserProfileDirectoryA Lib "usernv.dll" (ByVal lpProfileDir As String) As Boolean
این تابع مسیر پوشه تنظیمات مربوط به کاربر پیش فرض را بر می گرداند( Document and Settings )
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی True و اگر تابع با خطایی مواجه شود مقدار بر گشتی False خواهد بود
lpProfileDir : این بافر توسط تابع مقدار دهی می شود و حاوی مسیر پوشه مورد نظر خواهد بود
lpcchSize : این متغیر طول بافر lpProfileDir را بیان می کتد
majjjj
سه شنبه 30 بهمن 1386, 11:05 صبح
GetDesktopWindow
Private Declare Function GetDesktopWindow Lib "user32.dll" () As Long
این تابع هندل دسکتاپ را به دست می آورد
اگر تابع با خطایی مواجه شود مقدار برگشتی آن صفر خواهد بود در غیر این صورت مقدار برگشتی هندل دسکتاپ خواهد بود
majjjj
سه شنبه 30 بهمن 1386, 11:06 صبح
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 : این بافر توسط تابع مقدار دهی می شود و تعداد کل کلاستر ها را بر می گرداند
majjjj
سه شنبه 30 بهمن 1386, 11:08 صبح
GetDoubleClickTime
Private Declare Function GetDoubleClickTime Lib "user32.dll" () As Long
این تابع زمان Double Click را برمیگرداند
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی حد اکثر زمان مورد قبول بین دو دابل کلیک خواهد بود
majjjj
سه شنبه 30 بهمن 1386, 11:10 صبح
GetDriveType
Private Declare Function GetDriveType Lib "kernel32.dll" (ByVal nDriev as String) As Long
آین تابع نوع یک درایو را مشخص می کند
با توجه به مقدار برگشتی یکی از حالت های زیر ممکن است پیش آید:
0 : تابع با خطا مواجه شده است
1 : درایو مورد نظر وجود ندارد
2 : قابل حمل(فلش مموری ها)
3 : ثابت
4 : درایو شبکه ( مشترک )
5 : رم دیسک
6 : سی دی رام
nDrive : این متغیر به مسیر درایو اشاره می کند ( برای مثال : \:d )
majjjj
سه شنبه 30 بهمن 1386, 11:11 صبح
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 : فایل موقت
majjjj
سه شنبه 30 بهمن 1386, 11:12 صبح
GetFileSize
Private Declare Function GetFileSize Lib "kernel32.dll" (ByVal hFile As Long, ByVal lpFileSizeHight As Long) As Long
این تابع حجم یک فایل را به بایت بر می گرداند
اگر تابع کار خود را با موفقیت انجام دهد مقدار بر گشتی حجم فایل و در غیر اینصورت مقدار بر گشتی 1- خواهد بود
hFile : یک اشاره گر از فایل مورد نظر ( این اشاره گر را می توانید با استفاده از تابع CreateFile ایجاد کنید )
lpFileSize : مقدار این بافر توسط تابع مقدار دهی می شود و حاوی حجم فایل مورد نظر خواهد بود
majjjj
چهارشنبه 01 اسفند 1386, 09:42 صبح
GetFocus
Private Declare Function GetFocus Lib "user32.dll" () As Long
این تابع هندل (HWnd ) پنجره دارای فوکوس را به دست می آورد
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی هندل پنجره دارای فوکوس خواهد بود
majjjj
چهارشنبه 01 اسفند 1386, 12:30 عصر
GetForegroundWindow
Private Declare Function GetForegroundWindow Lib "user32.dll" () As Long
این تابع هندل فرم پنجره را برمیگرداند.
اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر و گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر خواهد بود که هندل پنجره فعال است
majjjj
شنبه 04 اسفند 1386, 08:52 صبح
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 : منابع آزاد کاربر
majjjj
شنبه 04 اسفند 1386, 08:53 صبح
GetKeyboardLayoutName
Private Declare Function GetKeyboardLayoutName Lib "user32.dll" (ByVal pwszKLID As String) As Long
این تابع زبان جاری صفحه کلید را بر می گرداند
اکر تابع با خطایی مواجه شود مقدار برگشتی صفر و در غیر اینصورت مقدار برگشتی آن یک مقدار غیر صفر خواهد بود
pwszKLID : این متغیر که توسط تابع مقدار دهی می شود یک رشتهء 9 کاراکتری است که کد زبان کنونی صفحه کلید است
majjjj
شنبه 04 اسفند 1386, 08:55 صبح
GetLastError
Private Declare Function GetLastError Lib "kernel32.dll" (ByVal dwErrCode As Long) As Long
این تابع شماره آخرین خطایی را که در کامپیوتر رخ داده بر می گرداند
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
dwErrCode : این بافر توسط تابع مقدار دهی می شود و حاوی شماره خطای آخرین خطای سیستمی خواهد بود
majjjj
شنبه 04 اسفند 1386, 08:56 صبح
GetLogicalDrives
Public Declare Function GetLogicalDrives Lib "kernel32.dll" () As Long
این تابع لیستی از درایو های My Computer را بر می گرداند.
اگر مقدار برگشتی تابع را با شماره درایو And کنید و نتیجه بگیرید؛ آنگاه درایو مورد نظر موجود است. برای مثال اگر جواب GetLogicalDrives Or 1 صفر نباشد آنگاه درایو A موجود است یا اگر جواب GetLogicalDrives Or 3 صفر نباشد آنگاه درایو C موجود است
majjjj
شنبه 04 اسفند 1386, 08:58 صبح
GetProfileDirectoryA
Private Declare Function GetProfileDirectoryA Lib "usernv.dll" (ByVal lpProfileDir As String, lpcchSize As Long) As Boolean
این تابع یک اشاره گر از یک منو را بر می گرداند. (توجه داشته باشید در اینجا منظور از منو تمام آیتم هایی است که در قسمت منوی یک پنجره ممکن است وجود داشته باشد ، مثل : File , Edit و غیره . برای گرفتن تک تک منوها باید از تابع GetSubMenu استفاده کرد)
اگر تابع کار خود را با موفقیت انجام دهد مقدار برگشتی یک اشاره گر از منوی موزد نظر خواهد بود در غیر اینصورت تابع مقدار صفر را برگشت خواهد داد
hwnd : هندل پنجره ای که منو در آن قرار دارد
majjjj
شنبه 04 اسفند 1386, 09:00 صبح
GetSysColor
Private Const COLOR_SCROLLBAR = 0
Private Const COLOR_BACKGROUND = 1
Private Const COLOR_ACTIVECAPTION = 2
Private Const COLOR_INACTIVECAPTION = 3
Private Const COLOR_MENU = 4
Private Const COLOR_WINDOW = 5
Private Const COLOR_WINDOWFRAME = 6
Private Const COLOR_MENUTEXT = 7
Private Const COLOR_WINDOWTEXT = 8
Private Const COLOR_CAPTIONTEXT = 9
Private Const COLOR_ACTIVEBORDER = 10
Private Const COLOR_INACTIVEBORDER = 11
Private Const COLOR_APPWORKSPACE = 12
Private Const COLOR_HIGHLIGHT = 13
Private Const COLOR_HIGHLIGHTTEXT = 14
Private Const COLOR_BTNFACE = 15
Private Const COLOR_BTNSHADOW = 16
Private Const COLOR_GRAYTEXT = 17
Private Const COLOR_BTNTEXT = 18
Private Const COLOR_INACTIVECAPTIONTEXT = 19
Private Const COLOR_BTNHIGHLIGHT = 20
Public Declare Function GetSysColor Lib "user32.dll" (ByVal nIndex As Long) As Long
این تابع رنگ قسمت های مختلف ویندوز را بر می گرداند ( در ویژوال بیسیک ثابت های ذخیره شده ای تحت نام SystemColorConstants وجود داند که دقیقاً همین کار را انجام می دهند )
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
nIndex : ایندکس قسمتی که باید رنگ آن توسط تابع برگردانده شود ( ثابت های زیر به شما کمک خواهد کرد )
COLOR_SCROLLBAR : رنگ اسکرول بار
COLOR_BACKGROUND : رنگ پس زمینه ویندوز
COLOR_ACTIVECAPTION : عنوان پنجره فعال
COLOR_INACTIVECAPTION : عنوان پنجره غیر فعال
COLOR_MENU : رنگ منو
COLOR_WINDOW : رنگ پنجره
COLOR_WINDOWFRAME : حاشیه پنجره
COLOR_MENUTEXT : نوشته منو
COLOR_WINDOWTEXT : نوشته پنجره
COLOR_CAPTIONTEXT : رنگ نوشته روی پنجره
COLOR_ACTIVEBORDER : لبه پنجره فعال
COLOR_INACTIVEBORDER : لبه پنجره غیر فعال
COLOR_APPWORKSPACE : فضای کاری دسکتاپ
COLOR_HIGHLIGHT : قسمتی از دکمه که در معرض نور قرار دارد
COLOR_HIGHLIGHTTEXT : نوشته انتخاب شده
COLOR_BTNFACE : رنگ دکمه ، پنجره ، فریم و ...
COLOR_BTNSHADOW : قسمتی از دکمه در قسمت سایهء آن قرار دارد
COLOR_GRAYTEXT : نوشته غیر فعال
COLOR_BTNTEXT : رنگ نوشته دکمه
COLOR_INACTIVECAPTIONTEXT : رنگ نوشته پنجره غیر فعال
COLOR_BTNHIGHLIGHT : رنگ نور ویندوز
majjjj
جمعه 10 اسفند 1386, 12:51 عصر
GetSystemDirectoryA
Private Declare Function GetSystemDirectoryA Lib "kernel32.dll" (ByVal lpBuffer As String,ByVal nBuffer As Long) As Long
این تابع مسیر فولدر سیستمی ویندوز را بر میگرداند
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و در غیر اینصورت مقدار بر گشتی صفر خواهد بود
lpBuffer : این متغیر توسط تابع مقدار دهی می شود و حاوی مسیر فولدر سیستمی خواهد بود
nBuffer : طول بافری که باید مسیر در آن ذخیره گردد را مشخص می کند
majjjj
جمعه 10 اسفند 1386, 12:52 عصر
GetTempPathA
Private Declare Function GetTempPathA Lib "kernel32.dll" (ByVal nBuffer As Long, lpBuffer As String) As Long
این تابع مسیر فولدر موقت (Temp Folder) ویندوز را بر می گرداند
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و در غیر اینصورت مقدار بر گشتی صفر خواهد بود
nBuffer : طول بافری که باید مسیر در آن ذخیره گردد را مشخص می کند
lpBuffer : این متغیر توسط تابع مقدار دهی می شود و حاوی مسیر فولدر موقت خواهد بود
majjjj
جمعه 10 اسفند 1386, 12:53 عصر
GetUserNameA
Private Declare Function GetUserNameA Lib "advapi32.dll" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
این تابع نام کاربر جاری را بر می گرداند
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و در غیر اینصورت مقدار بر گشتی صفر خواهد بود
lpBuffer : این متغیر توسط تابع مقدار دهی می شود و حاوی نام کاربر جاری خواهد بود
nSize : طول بافر ( متغیر lpBuffer )
majjjj
جمعه 10 اسفند 1386, 12:54 عصر
GetVersionExA
Private Type OSVERSIONINFO
dwOSVersionInfoSize As Long
dwMajorVersion As Long
dwMinorVersion As Long
dwBuildNumber As Long
dwPlatformId As Long
szCSDVersion As String * 128
End Type
Private Declare Function GetVersionExA Lib "kernel32.dll" (lpVersionInfo As OSVERSIONINFO) As Long
این تابع اطلاعاتی درباره نسخه و نگارش ویندوز را بر می گرداند
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
lpVersionInfo : این متغیر توسط تابع مقدار دهی می شود و حاوی اطلاعاتی راجه به نسخه ویندوز از نوع OSVERSIONINFO خواهد بود.
dwOSVersionInfoSize : طول نوع OSVERSIONINFO با بایت که توسط تابع باید برگردانده شود
dwMajorVersion : شماره نسخه اصلی ویندوز
dwMinorVersion : شماره نگارش ویندوز
dwBuildNumber : دفعات بازبینی ویندوز
dwPlatformId : شمارهء سکوی ( Platform ) ویندوز
szCSDVersion : نام رشته ای نسخه ویندوز
majjjj
جمعه 10 اسفند 1386, 12:59 عصر
GetWindowDirectory
Private Declare Function GetWindowDirectory Lib "kernel32.dll" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
این تابع مسیر فولدر ویندوز را بر می گرداند
اگر تابع با خطا مواجه شود مقدار بر گشتی صفر خواهد بود در غیر اینصورت مقدار بر گشتی برابر طول بافر خواهد بود
lpBuffer : مقدار این بافر توسط تابع مقدار دهی می شود و مقدار بر گشتی آن مسیر نصب ویندوز خواهد بود
nSize : طول بافر lpBuffer است
majjjj
جمعه 10 اسفند 1386, 13:00 عصر
GetWindowTextA
Private Declare Function GetWindowTextA Lib "user32.dll" (ByVal hwnd As Long,ByVal LpString As String, ByVal cch As Long) As Long
این تابع عنوان (Caption) پنجره داده شده را بر می گرداند
hwnd : هندل پنجره مورد نظر
LpString : این متغیر توسط تابع مقداردهی می شود و مقدار آن پس از اجرای تابع نوشته پنجره مورد نظر خواهد بود
cch : طول بافر ( LpString ) توجه کنید طول بافر را به میزان لازم بلند اعلام کنید
majjjj
جمعه 10 اسفند 1386, 13:01 عصر
GetWindowTextLenghtA
Private Declare Function GetWindowTextLenghtA Lib "user32.dll" (ByVal hwnd As Long) As Long
این تابع طول نوشتهء یک پنجره را بر می گرداند
اگر مقدار برگشتی صفر باشد نشانگر عدم موفقیت تابع است در غیر اینصورت مقدار برگشتی طول Caption پنجره خواهد بود
hwnd : هندل پنجره مورد نظر
majjjj
جمعه 10 اسفند 1386, 13:02 عصر
HideCaret
Private Declare Function HideCaret Lib "user32.dll" (ByVal hwnd As Long) As Long
این تابع نشانگر چشمک زن صفحه کلید را از روی پنجره (کنترل) مورد نظر مخفی می کند ( با تابع ShowCaret می توان چشمک زن را دوباره فعال کرد )
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hwnd : هندل پنجره مورد نظر
majjjj
جمعه 10 اسفند 1386, 13:03 عصر
InetIsOffLine
Private Declare Function InetIsOffLine Lib "url.dll" (ByVal dwFlags As Long) As Long
این تابع اتصال اینترنتی را بررسی می کند .
اگر مقدار برگشتی یک باشد آنگاه سیستم به اینترنت متصل نیست و اگر مقدار بازگشتی صفر باشد آنگاه سیستم به اینترنت متصل است.
majjjj
جمعه 10 اسفند 1386, 13:04 عصر
InternetGetConnectedState
Private Const INTERNET_CONNECTION_LAN As Long = &H2
Private Const INTERNET_CONNECTION_PROXY As Long = &H4
Private Const INTERNET_CONNECTION_MODEM_BUSY As Long = &H8
Private Const INTERNET_CONNECTION_OFFLINE As Long = &H20
Private Const INTERNET_CONNECTION_CONFIGURED As Long = &H40
Private Const INTERNET_RAS_INSTALLED As Long = &H10
Private Declare Function InternetGetConnectedState Lib "wininet.dll" (ByRef lpdwFlags As Long,ByVal dwReserved As Long) As Long
این تابع شیوه اتصال کامپیوتر محلی به شبکه اینترنت را بر می گرداند.
اگر تابع مقدار صفر را برگرداند یعنی کامپیوتر به اینترنت متصل نیست. در غیر این صورت کامپیوتر به ابنترنت متصل است و باید با And کردن بافر lpdwFlags با ثابت های زیر روش اتصال به اینترنت را به دست آورد
lpdwFlags : این بافر توسط تابع مقدار دهی می شود بیانگر شیوه اتصال به اینترنت خواهد بود ( ثابت های زیر )
INTERNET_CONNECTION_LAN : کامپیوتر از طریق شبکه محلی به اینترنت متصل است
INTERNET_CONNECTION_PROXY : کامپیوتر از پراکسی استفاده می کند
INTERNET_CONNECTION_MODEM_BUSY : مودم در دسترس نیست (مشغول است)
INTERNET_CONNECTION_OFFLINE : کامپیوتر offline است (به اینترنت متصل نیست)
INTERNET_CONNECTION_CONFIGURED : اتصال اینترنتی پیکره بندی شده است (کامپیوتر قابلیت اتصال به اینترنت را دارد)
INTERNET_RAS_INSTALLED : سیستم رمز گذاری Ras روی کامپیوتر نصب شده است
dwReserved : مقدار این آرگومان را &0 قرار دهید
majjjj
دوشنبه 13 اسفند 1386, 10:18 صبح
IsChild
Private Declare Function IsChild Lib "user32.dll" (ByVal hwnd As Long) As Long
این تابع بررسی می کند که آیا پنجره داده شده پنجره مادر است یا یک پنجره Child.
اگر هندل داده شده متعلق به یک پنجره مادر باشد آنگاه تابع مقدار صفر و در غیر اینصورت مقدار غیر صفر را برگشت خواهد داد
hwnd : هندل پنجره مورد نظر
majjjj
دوشنبه 13 اسفند 1386, 10:20 صبح
IsNTAdmin
Private Declare Function IsNTAdmin Lib "advpack.dll" (ByVal dwReserved As Long, ByVal lpdwReserved As Long) As Long
این تابع مشخص می کند آیا کاربر جاری اختیارات Administrator را دارد یا نه؟
اگر کاربر جاری اختیارات Administrator را نداشته باشد تابع مقدار صفر و در غیر اینصورت مقدار غیر صفر را بر می گرداند
dwReserved : مقدار این متغیر صفر است
lpdwReserved : مقدار این متغیر صفر است
majjjj
دوشنبه 13 اسفند 1386, 10:21 صبح
IsPwrShutdownAllowed
Private Declare Function IsPwrShutdownAllowed Lib "poweroff.dll" () As Long
این تابع بررسی می کند آیا سیستم قادر است به طور کامل خاموش شود یا نه ، در واقع این تابع ATX بودن پاور را بررسی می کند( ویندوز 2000 به بعد ).
اگر مقدار برگشتی یک باشد آنگاه سیستم قادر است خود به خود به طور کامل خاموش شود ولی اگر مقدار برگشتی 0 باشد آنگاه سیستم چنین توانایی ندارد
majjjj
دوشنبه 13 اسفند 1386, 10:22 صبح
IsWindow
Private Declare Function IsWindow Lib "user32.dll" (ByVal hwnd As Long) As Long
این تابع بررسی می کند آیا آرگومان داده شده هندل یکی از پنجره های موجود در دسکتاپ است یا خیر (منظور از پنجره تمام فرم ها و کنترل ها از جمله :TextBox و Button و غیره است)
اگر پنجره مورد نظر وجود نداشته باشد مقدار برگشتی تابع صفر خواهد بود در غیر این صورت تابع یک مقدار غیر صفر را برمی گرداند
hwnd : مشخص کننده هندل پنجره ای است که باید بررسی شود
majjjj
دوشنبه 13 اسفند 1386, 10:23 صبح
IsZoomed
Private Declare Function IsZoomed Lib "user32.dll" (ByVal hwnd As Long) As Long
این تابع بررسی می کند که آیا پنجره مورد نظر در حالت Maximize است یا خیر؟
اگر پنجره مورد نظر Maximize باشد تابع مقدار یک و در غیر اینصورت مقدار صفر را بر می گرداند
hwnd : هندل پنجره مورد نظر
majjjj
دوشنبه 13 اسفند 1386, 10:25 صبح
KillTimer
Private Declare Function KillTimer Lib "user32.dll" (ByVal hwnd As Long, ByVal nlDEvent As Long) As Long
این تابع تایمری را که با تابع SetTimer به وجود آمده، از بین می برد.
hwnd : هندل پنجره ای که تابع تحت آن اجرا می شود ( باید برابر با مقداری باشد که در تابع SetTimer مورد استفاده قرار گرفته است )
nlDEvent : این متغیر به یک اشاره گر که توسط تابع SetTimer ایجاد شده اشاره می کند
majjjj
دوشنبه 13 اسفند 1386, 10:26 صبح
LockWindowUpdate
Private Declare Function LockWindowUpdate Lib "kernel32.dll" (ByVal hwndLock As Long) As Long
این تابع یک کنترل را قفل می کند و هرگونه ترسیم، تغییر و به روزآوری روی کنترل مزبور غیر ممکن خواهد بود
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hwndLock : هندل کنترل مورد نظر
majjjj
سه شنبه 21 اسفند 1386, 12:47 عصر
MakeSureDirectoryPathExists
Private Declare Function MakeSureDirectoryPathExists Lib "imagehlp.dll" (ByVal lpPath As String) As Long
این تابع یک مسیر داده شده را ایجاد می کند. همچنین این تابع توانایی ساخت مسیر های تو در تو را نیز دارد. همانطور که از نام این تابع پیداست بعد از فراخوانی این تابع از وجود مسیر مورد نظر اطمینان حاصل خواهید کرد.
lpPath : این متغیر به مسیر مورد نظر اشاره می کند
majjjj
سه شنبه 21 اسفند 1386, 12:48 عصر
MessageBeep
Public Const MB_OK = &H0
Public Const MB_HANDICON = &H10
Public Const MB_QUETSIONICON = &H20
Public Const MB_EXCLAMATION = &H30
Public Const MB_ASTERIKICON = &H40
Private Declare Function MessageBeep Lib "user32.dll" ( ByVal wType As Long) As Long
این تابع برای پخش اصوات از پیش تعیین شده (Beep ) ویندوز مورد استفاده قرار می گیرد.
wType : نوع صوتی را که قرار است پخش شود مشخص می کند ( به ثابت ها توجه کنید )
majjjj
سه شنبه 21 اسفند 1386, 12:56 عصر
ModifyMenu
Declare Function ModifyMenuA Lib "user32.dll" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long, ByVal wIDNewItem As Long, ByVal lpString As Any) As Long
از این تابع برای ویرایش مشخصات یک منو استفاده می شود
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hMenu : یک اشاره گر از منوی مورد نظر
nPosition : محل قرار گیری آیتم مورد نظر
wFlags : مقدار این متغیر نحوه بیان nPosition را مشخص می کند
MF_BYPOSITION : نسبت به مکان منوی پنجره سنجیده می شود
MF_BYCOMMAND : نسبت به مکان منوی مادر سنجیده می شود
wIDNewItem : یک اشاره گر از منوی مورد نظر
lpString : این متغیر یک اشاره گر از یک تصویر بیت مپ است که باید در کنار منوی مورد نظر قرار گیرد
majjjj
سه شنبه 21 اسفند 1386, 13:01 عصر
MoveFile
Private Declare Function MoveFile Lib "kernel32.dll" (ByVal lpExistingName As String, ByVal lpNewFileName As String) As Long
این تابع برای انتقال یک فایل یا پوشه از محلی به محل دیگر مورد استفاده قرار می گیرد ( توانایی تغییر نام فایل ها و پوشه ها را نیز دارد )
lpExistingName : مسیر فایل مبدا
lpNewFileName : مسیر فایل مقصد ( اگر نام فایل متفاوت باشد در حین انتقال نام فایل نیز تغییر خواهد کرد )
majjjj
سه شنبه 21 اسفند 1386, 13:02 عصر
MoveWindow
Private Declare Function MoveWindow Lib "user32.dll" (ByVal hwnd, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal bRepaint As Long) As Long
این تابع توانایی تغییر محل و تغییر اندازه پنجره ها را دارد.
اگر تابع مقدار صفر را بر گرداند به منزلهء عدم موفقیت آن است و مقدار غیر صفر نشانگر موفقیت تابع است.
x : فاصلهء جدید پنجره از سمت چپ صفحه نمایش
y : فاصلهء جدید پنجره از بالای صفحه نمایش
nWidth : عرض جدید پنجره
nHeight : ارتفاع جدید پنجره
bRepaint : اگر این مقدار 1 باشد پنجره در محل جدید Refresh می شود و اگر 0 باشد عمل Refresh صورت نمی گیرد
majjjj
سه شنبه 21 اسفند 1386, 13:04 عصر
OpenClipboard
Private Declare Function OpenClipboard Lib "user32.dll" (ByVal hwnd As Long) As Long
این تابع کلیپ بورد را برای استفاده برنامه جاری قفل می کند تا برنامه های دیگر نتوانند به آن دسترسی داشته باشند
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hwnd : هندل پنجره ای که تابع باید تحت آن اجرا شود
قابل توجه دوستان فقط لطفا برای نوشتن ویروس ازش استفاده نکنین
majjjj
چهارشنبه 22 اسفند 1386, 09:06 صبح
PlaySoundA
Private Declare Function PlaySoundA Lib "winmm.dll" (ByVal lpszeName As String, ByVal Reserved As Long, ByVal dwFlags As Long) As Long
این تابع یک فایل Wav را پخش می کند اگر فایل صوتی مزبور در مسیر داده شده موجود نباشد آنگاه تابع صدای Beep را پخش خواهد کرد
lpszeName : نام و مسیر فایل صوتی
Reserved : مقدار این متغیر را برابر &0 قرار دهید
dwFlags : نوع و روش پخش فایل صوتی
majjjj
چهارشنبه 22 اسفند 1386, 09:10 صبح
SetTimer
Private Declare Function SetTimer Lib "user32.dll" (ByVal hwnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long) As Long
این تابع یک تایمر ایجاد می کند تا در یک فاصله زمانی مشخص یک عمل تکرار شود ( برای از بین بردن یک تایمر باید از تابع KillTimer استفاده کرد )
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hwnd : هندل پنجره ای که تابع باید تحت آن اجرا شودو در صورتی که می خواهید تایمر ایجاد شده تحت پنجره خاصی نباشد مقدار این متغیر را برابر صفر قرار دهید
nIDEvent : این متغیر شماره شناسایی تایمر است که از آن برای از بین بردن تایمر ایجاد شده استفاده می شود. اگر متغیر hwnd را برابر صفر قرار دهید باید این متغیر را نیز با مقدار صفر مقدار دهی کنید
uElapse : این متغیر فاصله زمانی را که تایمر باید اجرا شود بیان می کند و در واقع به منزلهء Interval تایمر مورد نظر است
lpTimerFunc : در این متغیر باید آدرس تابعی را قرار دهید که قرار است تایمر مورد نظر در آن اجرا شود ( باید از تابع AddressOf استفاده کنید )
majjjj
چهارشنبه 22 اسفند 1386, 09:12 صبح
TransParentBlt
Private Declare Function TransParentBlt Lib "msimg32.dll" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal srcX As Long, ByVal srcY As Long, ByVal srcnWidth As Long, ByVal srcnHeight As Long, ByVal CrTransparent As Long) As Long
این تابع از یک کنترل گرافیکی عکس می گیرد ، آنرا تغییر اندازه می دهد ، یک رنگ دلخواه از آن را حذف می کند و آنرا ار یک کنترل گرافیکی دیگر قرار می دهد
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hdc : هندل بافت گرافیکی کنترلی که باید عکس ساخته شده در آن قرار گیرد
nWidth : نقطه شروع ترسیم عکس در راستای افق
nHeight : نقطه شروع ترسیم عکس در راستای عمود
nWidth : عرض تصویر
nHeight : طول تصویر
hSrcDC : هندل بافت گرافیکی کنترلی که باید از آن عکس گرفته شود
srcX : نقطه شروع ترسیم عکس در راستای افق
srcY : نقطه شروع ترسیم عکس در راستای عمود
srcnWidth : عرض عکس
srcnHeight : طول عکس
CrTransparent : رنگی به باید حذف شود
majjjj
چهارشنبه 22 اسفند 1386, 09:15 صبح
URLDowlLoadToFile
Private Declare Function URLDowlLoadToFile LibA "url.dll" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
از این تابع برای یک صفحه اینترنتی روی کامپیوتر محلی استفاده می شود
گر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
pCaller : مقدار این متغیر را برابر صفر قرار دهید
szURL : آدرس اینترنتی مورد نظر
szFileName : محل و نامی کا فایل باید در آن ذخیره شود
dwReserved : مقدار این متغیر را برابر صفر قرار دهید
lpfnCB : مقدار این متغیر را برابر صفر قرار دهید
majjjj
چهارشنبه 22 اسفند 1386, 09:21 صبح
VerifyScreenSavePwd
Private Declare Function VerifyScreenSavePwd Lib "password.cpl" (ByVal hwnd As Long) As Long
این تابع پنجره دریافت کلمه عبور محافظ صفحه نمایش را نشان می دهد
اگر تابع کار خود را با موفقیت به پایان برساند مقدار بازگشتی یک عدد غیر صفر و اگر تابع با خطایی مواجه شود مقدار بر گشتی صفر خواهد بود
hwnd : هندل پنجره ای که تابع تحت آن اجرا می شود
majjjj
چهارشنبه 22 اسفند 1386, 09:23 صبح
WindowFromPoint
Private Declare Function WindowFromPoint Lib "user32.dll" (ByVal xPoint As Long, ByVal yPoint As Long) As Long
این تابع هندل پنجره موجود در یک نقطه مشخص از دسکتاپ را به دست می آورد
اگر تابع با خطایی مواجه شود مقدار بازگشتی صفر و در غیر اینصورت مقدار بازگشتی هندل پنجره موجود در نقطه مورد نظر خواهد بود
xPoint : عرض نقطه مورد نظر
yPoint : طول نقطه مورد نظر
majjjj
چهارشنبه 22 اسفند 1386, 09:27 صبح
خدا رو شکر دوست داشتم تعداد بیشتری بگذارم اما تصمیمم عوض شد دوستان اگه نواقصی داره به بزرگواری خودشون ببخشن
majjjj
یک شنبه 21 مهر 1387, 08:41 صبح
دیروز داشتم کتابهای api خودم رو دنبال یک مطلب میگشتم یادم به این تایپیک افتاد گفتم بد نیست هر از گاهی هم یک رونقی به اینجا بدم دوستان هم اگه چیزی داشتن که بدرد بقیه بخوره اینجا بذارن بقیه هم استفاده کنن
majjjj
یک شنبه 21 مهر 1387, 08:48 صبح
Private Declare Function PaintDesktop Lib "user32.dll" (ByVal hdc As Long) As Long
این تابع یک تصویر از دسکتاپ ویندوز رو روی یک بافت گرافیکی نشون میده
این هم یک نمونه
'This project needs:
'- two picture boxes
'- a button
Private Type POINTAPI
X As Long
Y As Long
End Type
Private Declare Function GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long) As Long
Private Declare Function SetPixel Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long, ByVal crColor As Long) As Long
Private Declare Function PaintDesktop Lib "user32" (ByVal hdc As Long) As Long
Private Declare Function StretchBlt Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal nSrcWidth As Long, ByVal nSrcHeight As Long, ByVal dwRop As Long) As Long
Private Declare Function GetBkColor Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function MoveToEx Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long, lpPoint As POINTAPI) As Long
Private Declare Function LineTo Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long) As Long
Const ScrCopy = &HCC0020
Const Yellow = &HFFFF&
Private Sub Form_Load()
'KPD-Team 1998
'URL: http://www.allapi.net/
'E-Mail: KPDTeam@Allapi.net
Dim Cnt1 As Byte, Cnt2 As Byte, Point As POINTAPI
'Set the graphic mode to persistent
Me.AutoRedraw = True
'API uses pixels
Me.ScaleMode = vbPixels
Picture1.ScaleMode = vbPixels
Picture2.ScaleMode = vbPixels
'No borders
Picture1.BorderStyle = 0: Picture2.BorderStyle = 0
'Set the button's caption
Command1.Caption = "Paint && Stretch"
'Set the graphic mode to 'non persistent'
Picture1.AutoRedraw = False: Picture2.AutoRedraw = False
For Cnt1 = 0 To 100 Step 3
For Cnt2 = 0 To 100 Step 3
'Set the start-point's coِrdinates
Point.X = Cnt1: Point.Y = Cnt2
'Move the active point
MoveToEx Me.hdc, Cnt1, Cnt2, Point
'Draw a line from the active point to the given point
LineTo Me.hdc, 200, 200
Next Cnt2
Next Cnt1
For Cnt1 = 0 To 100 Step 5
For Cnt2 = 0 To 100 Step 5
'Draw a pixel
SetPixel Me.hdc, Cnt1, Cnt2, Yellow
Next Cnt2
Next Cnt1
End Sub
Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim XX As Long, YY As Long, A As Long
XX = X: YY = Y
'Set the picturebox' backcolor
Picture2.BackColor = GetPixel(Picture1.hdc, XX, YY)
End Sub
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
Dim XX As Long, YY As Long, A As Long
XX = X: YY = Y
'Set the picturebox' backcolor
Picture2.BackColor = GetPixel(Picture1.hdc, XX, YY)
End If
End Sub
Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim XX As Long, YY As Long, A As Long
XX = X: YY = Y
'Set the picturebox' backcolor
Picture2.BackColor = GetPixel(Picture1.hdc, XX, YY)
End Sub
Private Sub Command1_Click()
'Set the width and height
Picture2.Width = 100: Picture2.Height = 100
Picture1.Width = 50: Picture1.Height = 50
'No pictures
Picture1.Picture = LoadPicture("")
DoEvents
Copy the desktop to our picturebox
PaintDesktop Picture1.hdc
'Stretch the picture
StretchBlt Picture2.hdc, 0, 0, 100, 100, Picture1.hdc, 0, 0, 50, 50, ScrCopy
End Sub
majjjj
یک شنبه 21 مهر 1387, 08:52 صبح
این هم نمونه ساده از همون کدبالا
Private Declare Function PaintDesktop Lib "user32" (ByVal hdc As Long) As Long
Private Sub Command1_Click()
PaintDesktop Me.hdc
End Sub
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.