diff --git a/Units/MMLCore/dtmutil.pas b/Units/MMLCore/dtmutil.pas index b556efa..f84ea8c 100644 --- a/Units/MMLCore/dtmutil.pas +++ b/Units/MMLCore/dtmutil.pas @@ -37,8 +37,7 @@ Procedure PrintpDTM(aDTM : pDTM); procedure initdtm(out d: pdtm; len: integer); function ValidMainPointBox(var dtm: pDTM; const x1, y1, x2, y2: Integer): TBox; -function ValidMainPointBoxRotated(var dtm: pDTM; const x1, y1, x2, y2: Integer; - sAngle, eAngle, aStep: Extended): TBox; +function ValidMainPointBoxRotated(var dtm: pDTM; const x1, y1, x2, y2: Integer): TBox; function DTMConsistent(var dtm: pdtm): boolean; procedure NormalizeDTM(var dtm: pdtm); @@ -239,8 +238,7 @@ begin Result.y2 := y2 - b.y2; end; -Function ValidMainPointBoxRotated(var dtm: pDTM; const x1, y1, x2, y2: Integer; - sAngle, eAngle, aStep: Extended): TBox; +Function ValidMainPointBoxRotated(var dtm: pDTM; const x1, y1, x2, y2: Integer): TBox; var i, d: Integer; @@ -253,13 +251,12 @@ begin dtm.p[0] := dtm.p[0] - dtm.p[0]; - { FIXME } for i := 0 to high(dtm.c) do begin - d := max(dtm.p[i].x - dtm.asz[i], d); - d := max(dtm.p[i].x + dtm.asz[i], d); - d := max(dtm.p[i].y - dtm.asz[i], d); - d := max(dtm.p[i].y + dtm.asz[i], d); + d := max(dtm.p[i].x - dtm.asz[i], d); + d := max(dtm.p[i].x + dtm.asz[i], d); + d := max(dtm.p[i].y - dtm.asz[i], d); + d := max(dtm.p[i].y + dtm.asz[i], d); end; Result.x1 := d;