There are no specific methods supported by ImageEn that does embossed colored relief. You can do embossing that provides the relief but not by color. My guess is that you would have to fill the colors then apply an emboss.
This does the embossing, but not by color:
procedure TForm1.Button1Click(Sender: TObject);
const
iFilter: TGraphFilter = (Values: ((2, 0, 0), (0, 1, 0), (0, 0, -2)); Divisor: 1); // Emboss
iFilter2: TGraphFilter = (Values: ((-1, 0, 1), (-1, 1, 1), (-1, 0, 1)); Divisor: 1); // Emboss
begin
ImageEnView1.Proc.ApplyFilter(iFilter);
//ImageEnView1.Proc.ApplyFilter(iFilter2);
ImageEnView.Update;
end;;
Remark ImageEnView1.Proc.ApplyFilter(iFilter) and unremark ImageEnView1.Proc.ApplyFilter(iFilter2) to see slightly different results.
William Miller
Email: w2m@frontiernet.net
EBook: http://www.imageen.com/ebook/
Apprehend: http://www.frontiernet.net/~w2m/index.html
Search
