09-23-2011، 01:51 PM
در سورس زیر که با ویژوال بیسیک 6 نوشته شده است منبع خوبی برای کسانی که فعلا میخوان رنگ تصاویر رو مثلا سیاه سفید با بصورت تاریک تبدیل کنند.
همچنین در این سورس از چند تابع api گرافیکی استفاده شده
از قبیل :
تصویر برنامه :
دانلود:
Image_AutoCorrection(www.parsicoders.com).rar (اندازه 147.86 KB / تعداد دانلود: 39)
پسوورد :
همچنین در این سورس از چند تابع api گرافیکی استفاده شده
از قبیل :
کد:
Declare Function SetStretchBltMode Lib "gdi32" (ByVal hdc As Long, ByVal nStretchMode As Long) As Long
Declare Function StretchDIBits Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal dX As Long, ByVal dy As Long, ByVal SrcX As Long, ByVal SrcY As Long, ByVal SrcWidth As Long, ByVal SrcHeight As Long, lpBits As Any, lpBitsInfo As BITMAPINFO, ByVal wUsage As Long, ByVal dwRop As Long) As Long
Declare Function GetObject Lib "gdi32" Alias "GetObjectA" (ByVal hObject As Long, ByVal nCount As Long, lpObject As Any) As Long
Declare Function GetBitmapBits Lib "gdi32" (ByVal hBitmap As Long, ByVal dwCount As Long, lpBits As Any) As Long
Declare Function SetBitmapBits Lib "gdi32" (ByVal hBitmap As Long, ByVal dwCount As Long, lpBits As Any) As Long
Declare Function GetDIBits Lib "gdi32" (ByVal hdc As Long, ByVal hBitmap As Long, ByVal nStartScan As Long, ByVal nNumScans As Long, lpBits As Any, lpBI As BITMAPINFO, ByVal wUsage As Long) As Long
تصویر برنامه :
دانلود:
Image_AutoCorrection(www.parsicoders.com).rar (اندازه 147.86 KB / تعداد دانلود: 39)
پسوورد :
کد:
www.parsicoders.com
گروه دور همی پارسی کدرز
https://t.me/joinchat/GxVRww3ykLynHFsdCvb7eg
https://t.me/joinchat/GxVRww3ykLynHFsdCvb7eg