Hi DDA,
| Draw it into a Picture object, and loop over its RGBSurface doing:
| c=rs.Pixel(n,j)
| k=(C.Red * 0.275) + (C.Green * 0.58) + (C.Blue * 0.145)
| rs.Pixel(n,j)=rgb(k,k,k)
| you could also just average out the three colours, ie
| k=(c.red+c.green+c.blue)\3
| but I found that the one above produced better results. My ImageTools
| library [plain RB] does that and much more.
Thank you. :)
All the best,
Mark.
--
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.385 / Virus Database: 268.3.3/296 - Release Date: 29/03/2006
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
|