Posted: Sun Aug 26, 2007 8:14 pm Post subject: الگوريتم گرفتن نويز تصوير
گرفتن noise تصوير :
از روش هاي گرفتن noise تصوير پيمايش كليه پيكسلهاي تصوير مي باشد و جايگزين آن با معدل 9 پيكسل طرفين آن . ( توجه داشته باشيد كه پيكسلهاي سطر اول و ستون اول و سطر آخر و ستون آخر در اين روش گرفته نمي شوند ) .
for j:=1 to image2.height-1 do
for i:=1 to image2.width-1 do
begin
c[1]:=image2.Canvas.Pixels[i-1,j-1];
c[2]:=image2.Canvas.Pixels[i,j-1];
c[3]:=image2.Canvas.Pixels[i+1,j-1];
c[4]:=image2.Canvas.Pixels[i-1,j];
c[5]:=image2.Canvas.Pixels[i,j];
c[6]:=image2.Canvas.Pixels[i+1,j];
c[7]:=image2.Canvas.Pixels[i-1,j+1];
c[8]:=image2.Canvas.Pixels[i,j+1];
c[9]:=image2.Canvas.Pixels[i+1,j+1];
sr:=0;
for k:=1 to 9 do
begin
sr:=getrvalue(c[k])+sr;
end;
mr:=sr div 9;
image2.Canvas.Pixels[i,j]:=rgb(mr,mr,mr);
end;
Posted: Sun Jul 13, 2008 11:03 pm Post subject: سلام_ در مورد ذخیره کردن تغییرات اعمال شده بر عکس
سلام
می خواستم بدونم که تغییراتی که بر روی عکس اعمال کردیم رو چگونه بر روی فایل ذخیره کنیم.
یه برنامه ای نوشتم که چند تا از فیلتر های فتوشاپ رو رو عکس اعمال میکنه . فقط ذخیره کردن بر روی فایل رو لنگم
کمک کنید
ممنون
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum