+ نوشته شده در چهارشنبه یازدهم مرداد 1385ساعت 4 قبل از ظهر  توسط سید شاهرخ نبوی
|
+ نوشته شده در دوشنبه نهم مرداد 1385ساعت 2 قبل از ظهر  توسط سید شاهرخ نبوی
|
+ نوشته شده در شنبه هفتم مرداد 1385ساعت 3 قبل از ظهر  توسط سید شاهرخ نبوی
|
اين تابع جالب، يه جورايي واسه خودش آخر Photoshop. با اين تابع مي تونين کارايي مثل smoothing, anti-aliasing, edge detection,
detail enhancment و غيره انجام داد.
فقط کافيه مقادير عددي آرايه 2بعدي که تو مثال اين کد نوشته شده را عوض کنيد. حتما تستش کنيد خيلي جالبه....
براي استفاده 2 يونيت، Graphics, Windows را اضافه کنيد. سپس نوع جديد زير را قبل از کلمه کليدي implementation اضافه کنيد و در نهايت تابع را اضافه کنيد. (برای دیدن کد کلیک کنید)
کد ۱۸
+ نوشته شده در دوشنبه دوم مرداد 1385ساعت 4 قبل از ظهر  توسط سید شاهرخ نبوی
|
بوسيله اين تابع شما مي توانيد قلمي ساخته که روي عکس را به صورت اسپري رنگ آميزي کند.
تابع Spray داراي 5 آرگومان است:
procedure Spray(Canvas: TCanvas; x, y, r: Integer; Color: TColor);
Canvas در واقع پرده نقاشي تصوير مورد نظرتان را تعيين ميکند، x,y مختصات مرکزي دايره اي که اسپري ميشود را تعيين ميکند، r شعاع دايره اسپري را مشخص مي کند، Color رنگ اسپري را مشخص مي کند.
توجه کنيد عکس انتخابي حتما Bmp باشد. (برای دیدن کد کلیک کنید)
کد ۱۶
+ نوشته شده در دوشنبه دوم مرداد 1385ساعت 4 قبل از ظهر  توسط سید شاهرخ نبوی
|