PDA

View Full Version : image



abbas.com
چهارشنبه 28 مرداد 1383, 02:49 صبح
با عرض سلام و خسته نباشید خدمت دوستان
من می خواهم قسمتی از یک
image
مثالا یک مربع از image را به کلیپ برد لود کرده و با استفاده از الگوریتم های پردازش تصویر رنگ ان را تغییر داده و دوباره در جای خود قرار داده وذخیره کنم
من الگوریتم های پردا زش تصویر را بلدم فقط می خواهم بدانم که چگونه میتوان قسمتی از یک تصویر داخل کنترل image را به کلیپ برد لود کرد وچگونه به پیکسلهای
ان دسترسی پیدا کرد


متشکرم

حق نگهدارتان.

_alish_
چهارشنبه 28 مرداد 1383, 07:01 صبح
Help Delphi


var
Bitmap: TBitmap;
MyRect, MyOther: TRect;
begin

MyRect := Rect(10,10,100,100);

MyOther := Rect(10,111,100, 201);
Bitmap := TBitmap.Create;
Bitmap.LoadFromFile('c:\windows\tartan.bmp');
Form1.Canvas.BrushCopy(MyRect, Bitmap, MyRect, clBlack);
Form1.Canvas.CopyRect(MyOther,Bitmap.Canvas,MyRect );
Bitmap.Free;
end;