如何在设置brush的style属性才能画出类似微软的project所画工作的填充模式(不是由单一色填充)(200分)

  • 主题发起人 主题发起人 whitelion
  • 开始时间 开始时间
W

whitelion

Unregistered / Unconfirmed
GUEST, unregistred user!
如何在设置brush的style属性才能画出类似微软的project所画工作的填充模式
(不是由单一色填充)
 
您说得不是很清楚;
我想应该是这样来理解:
您想设置Brush的填充模式

Canvas.Brush.Bitmap :=.......

看帮助里的例子:
var
Bitmap: TBitmap;
begin
Bitmap := TBitmap.Create;
try
Bitmap.LoadFromFile('f:/图片/b.bmp');
Form1.Canvas.Brush.Bitmap := Bitmap;
Form1.Canvas.FillRect(Rect(0,0,100,100));
finally
Form1.Canvas.Brush.Bitmap := nil;
Bitmap.Free;
end;
end;

利用这种方法,您只需要事先绘制Bitmap,然后赋给Canvas.Brush.Bitmap好了。
 
接受答案了.
 

Similar threads

D
回复
0
查看
825
DelphiTeacher的专栏
D
D
回复
0
查看
831
DelphiTeacher的专栏
D
D
回复
0
查看
664
DelphiTeacher的专栏
D
后退
顶部