Private Declare Function ClientToScreen Lib "gdi32.dll" (ByVal hwnd As Long, ByVal lpPoint As POINTAPI) As Long
اين تابع مختصات يک نقطه را در يک پنجره مي گيرد و مختصات همان نقطه را در صفحه نمايش مي دهد
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود
hwnd : هندل پنجره مورد نظر
lpPoint : مختصات نقطه مورد نظر از نوع POINTAPI ( مختصات داده شده بايد بر حسب پيکسل باشد )
Private Declare Function ClipCursor Lib "user32.dll" (lpRect As Any) As Long
اين تابع ماوس را در يک چهار گوش محصور مي کند تا حرکت ماوس در آن منطقه محدود باشد.
براي لغو انحصار ماوس تابع را با آرگومان &0 اجرا کنيد ( ClipCursor &0 ).
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود
RECT : اين نوع به محدوده اي که ماوس بايد در آن محصور باشد اشاره مي کند
Private Declare Function CloseClipboard Lib "user32.dll" () As Long
اين تابع کليپ بورد را که توسط تابع OpenClipboard قفل شده ، باز مي کند تا برنامه هاي ديگر بتوانند به آن دسترسي داشته باشند.
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود
Private Declare Function CloseWindow Lib "user32.dll" (ByVal hWnd As Long) As Long
اين تابع پنجره مشخص شده را به حالت Minimize مي برد.
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود
hWnd : اين متغير هندل پنجره اي است که بايد کمينه شود
Private Const RGN_AND = 1
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 : کل ناحيه اول را بر مي گرداند
Private Declare Function CopyFileA Lib "kernel32.dll" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As long) As Long
اين تابع از يک فايل موجود يک کپي تهيه مي کند
گر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود
lpExistingFileName : آدرس فايل مقصد
lpNewFileName : آدرس فايل جديد (مبدا)
bFailIfExists : اين متغير مشخص مي کند در صورت وجود فايل مقصد عمليات کپي ادامه يابد يا نه اگر صفر باشد انجام ميشود و اگر يک باشد انجام نمي شود
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 : طول تصوير مورد نظر
Private Declare Function CreateDirectoryA Lib "kernel32.dll" (ByVal lpPathName As String, ByVal lpSecurityAttributes As Long) As Long
اين تابع يک فولدر جديد در محل داده شده ايجاد مي کند ( پوشه والد پوشه جديد بايد موجود باشد )
اگر تابع با خطايي مواجه شود مقدار بازگشتي صفر و در غير اينصورت مقدار بازگشتي يک اشاره گر از قلم ساخته شده خواهد بود
lpPathName : نام و مسير پوشه اي که بايد ساخته شود
lpSecurityAttributes : مقدار اين متغير را برابر صفر قرار دهيد
Private Declare Function CreateDirectoryExA Lib "kernel32.dll" (ByVal lpTemplateDirectory As String, ByVal lpNewDirectory As String, ByVal lpSecurityAttributes As Any) As Long
اين تابع يک پوشه جديد با صفات يک پوشه ديگر ايجاد مي کند ( پوشه والد پوشه جديد بايد موجود باشد )
اگر تابع با خطايي مواجه شود مقدار بازگشتي صفر و در غير اينصورت مقدار بازگشتي يک اشاره گر از قلم ساخته شده خواهد بود
lpTemplateDirectory : نام و مسير پوشه نمونه ( پوشه اي که بايد پوشه مورد نظر از روي آن ساخته شود )
lpNewDirectory : نام و مسير پوشه مورد نظر
lpSecurityAttributes : مقدار اين متغير را برابر صفر قرار دهيد
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 گوشه پايين سمت راست
Private Declare Function CreatePatternBrush Lib "gdi32.dll" (ByVal hBitmap As Long) As Long
اين تابع يک قلم با الگوي تصوير براي استفاده در توابع گرافيکي مي سازد
اگر تابع با خطايي مواجه شود مقدار بازگشتي صفر و در غير اينصورت مقدار بازگشتي يک اشاره گر از قلم ساخته شده خواهد بود
hBitmap : يک اشاره گر از تصوير مورد نظر ( مي توانيد از نوع stdPicture موجود در ويژوال بيسيک مثل پروپرتي Picture موجود در PictureBox و غيره استفاده کنيد )
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 و غيره استفاده کنيد )
Private Const ALTERNATE = 1
Private Const WINDING = 2
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 : نحوه ساخت چند ضلعي
Private Declare Function CreatePopupMenu Lib "user32.dll" () As Long
اين تابع يک منوي شناور (پاپ آپ) ايجاد مي کند. به وسيله توابع ديگر مي توان به اين منو آيتم اضافه کرد
اگر تابع با خطايي مواجه شود مقدار بازگشتي صفر و در غير اينصورت مقدار بازگشتي هندل منوي ايجاد شده خواهد بود
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 گوشه پايين سمت راست
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