Canvas в Delphi

[Claster]

Всем привет скажите как сделать то что нарисовано в канве полупрозрачным?

Рисую заштрихованный квадратик

Image4.Canvas.Brush.Style := bsFDiagonal;
  Image4.Canvas.FillRect(rect(0,0,Image1.Width,Image1.Height));//штрихуем
  Image4.Canvas.Rectangle(Image1.Width-12, Image1.Height-12, Image1.Width, Image1.Height);

[Swarog]

Полупрозрачным относительно чего? Стандартными средствами: надо смотреть в сторону GDI+, только там есть работа с прозрачностью. Не стандартными средствами: рисуешь на отдельной канве а потом программно соединяешь изображения с учетом прозрачности.