如果你要达到文字特殊效果,应该设置相对的brush和pen的属性 如透明效果: Canvas.Brush.Style:=bsclear; 如果要达到特殊的对齐效果,可以用winAPI DrawText eg: var Rect:TRect; S:String; begin S:='canvas example'; Rect:=ClientRect; DrawText(Canvas.Handle,PChar(S),Length(S),Rect,DT_CENTER or DT_VCENTER or DT_SINGLELINE); end;
如透明效果:
Canvas.Brush.Style:=bsclear;
如果要达到特殊的对齐效果,可以用winAPI DrawText
eg:
var
Rect:TRect;
S:String;
begin
S:='canvas example';
Rect:=ClientRect;
DrawText(Canvas.Handle,PChar(S),Length(S),Rect,DT_CENTER or DT_VCENTER or DT_SINGLELINE);
end;