【dxBarCode】官方例子学习
1. 增加Logo
TMydxBarCode = class(TdxBarCode)
protected
FImageList: TcxImageList;
procedure Paint; override;
end;
procedure TMydxBarCode.Paint;
var
X, Y: Integer;
ARect: TRect;
begin
inherited;
ARect := ViewInfo.InnerEditRect;
X := ARect.Left + (ARect.Width div 2) - (FImageList.Width div 2);
Y := ARect.Top + (ARect.Height div 2) - (FImageList.Height div 2);
Canvas.DrawImage(FImageList, X, Y, 0);
end;
2.改变边距
Every Day In Dream,So..............
浙公网安备 33010602011771号