ConvMargArray

procedure ConvMargArray(

  const VM: ThtVMarginArray;

  BaseWidth: Integer;

  BaseHeight: Integer;

  EmSize: Integer;

  ExSize: Integer;

  BorderWidth: Integer;

  out AutoCount: Integer;

  var M: ThtMarginArray;

  PixelsPerInch: Integer

);