Posted: Sun Aug 26, 2007 8:15 pm Post subject: الگوريتم كوچك سازي تصوير
كوچك كردن تصوير .
براي كوچك كردن تصوير باندازه ¼ تصوير اصلي مي توان يك پيكسل از هر 4 پيكسل تصوير را جايگزين كرد. يعني با انتقال يك ارايه 2*2 روي تصوير و انتخاب خانه اول اين آرايه در تصوير جديد تصوير قبلي را باندازه ¼ كوچكتر كرد :
i:=0; j:=0 ; k:=0; l:=0;
while j<image1.Picture.Height do
begin
while i< image1.Picture.Width do
begin
image2.Canvas.Pixels[i div 2,j div 2]:=image1.canvas.pixels[i,j];
i:=i+2;
end;
j:=j+2;
i:=0;
end;
end;
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