mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-22 09:12:19 -05:00
Small API change.
git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@549 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
parent
e1e46c1def
commit
816961da9e
@ -37,7 +37,8 @@ Procedure PrintpDTM(aDTM : pDTM);
|
|||||||
|
|
||||||
procedure initdtm(out d: pdtm; len: integer);
|
procedure initdtm(out d: pdtm; len: integer);
|
||||||
function ValidMainPointBox(var dtm: pDTM; const x1, y1, x2, y2: Integer): TBox;
|
function ValidMainPointBox(var dtm: pDTM; const x1, y1, x2, y2: Integer): TBox;
|
||||||
function ValidMainPointBoxRotated(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 DTMConsistent(var dtm: pdtm): boolean;
|
function DTMConsistent(var dtm: pdtm): boolean;
|
||||||
procedure NormalizeDTM(var dtm: pdtm);
|
procedure NormalizeDTM(var dtm: pdtm);
|
||||||
|
|
||||||
@ -238,7 +239,8 @@ begin
|
|||||||
Result.y2 := y2 - b.y2;
|
Result.y2 := y2 - b.y2;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
Function ValidMainPointBoxRotated(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;
|
||||||
|
|
||||||
var
|
var
|
||||||
i, d: Integer;
|
i, d: Integer;
|
||||||
|
@ -2069,7 +2069,7 @@ begin
|
|||||||
|
|
||||||
// Get the area we should search in for the Main Point.
|
// Get the area we should search in for the Main Point.
|
||||||
//writeln(Format('%d, %d, %d, %d', [x1,y1,x2,y2]));
|
//writeln(Format('%d, %d, %d, %d', [x1,y1,x2,y2]));
|
||||||
MA := ValidMainPointBoxRotated(DTM, x1, y1, x2, y2);
|
MA := ValidMainPointBoxRotated(DTM, x1, y1, x2, y2, sAngle, eAngle, aStep);
|
||||||
//writeln(Format('%d, %d, %d, %d', [MA.x1,MA.y1,MA.x2,MA.y2]));
|
//writeln(Format('%d, %d, %d, %d', [MA.x1,MA.y1,MA.x2,MA.y2]));
|
||||||
|
|
||||||
DefaultOperations(MA.x1, MA.y1, MA.x2, MA.y2);
|
DefaultOperations(MA.x1, MA.y1, MA.x2, MA.y2);
|
||||||
|
Loading…
Reference in New Issue
Block a user