【dxBarCode】官方例子学习

  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.改变边距

posted @ 2023-02-07 15:19  mxKings  阅读(46)  评论(0)    收藏  举报