mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-29 04:22:16 -05:00
Small typo + some var -> out params.
This commit is contained in:
parent
850620d946
commit
77420fa172
@ -49,14 +49,14 @@ begin
|
|||||||
result := MFinder.FindDTMRotated(MDTM.GetDTM(DTM), x, y, xs, ys, xe, ye, sAngle, eAngle, aStep, aFound,false);
|
result := MFinder.FindDTMRotated(MDTM.GetDTM(DTM), x, y, xs, ys, xe, ye, sAngle, eAngle, aStep, aFound,false);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function ps_FindDTMsRotatedAlternating(DTM: Integer; var Points: TPointArray; xs, ys, xe, ye: Integer; sAngle, eAngle, aStep: Extended; out aFound: T2DExtendedArray): Boolean; extdecl;
|
function ps_FindDTMsRotatedAlternating(DTM: Integer; var Points: TPointArray; xs, ys, xe, ye: Integer; sAngle, eAngle, aStep: Extended; var aFound: T2DExtendedArray): Boolean; extdecl;
|
||||||
begin
|
begin
|
||||||
with CurrThread.Client do
|
with CurrThread.Client do
|
||||||
result := MFinder.FindDTMsRotated(MDTM.GetDTM(DTM), Points, xs, ys, xe, ye,
|
result := MFinder.FindDTMsRotated(MDTM.GetDTM(DTM), Points, xs, ys, xe, ye,
|
||||||
sAngle, eAngle, aStep, aFound, true);
|
sAngle, eAngle, aStep, aFound, true);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function ps_FindDTMsRotatedSE(DTM: Integer; var Points: TPointArray; xs, ys, xe, ye: Integer; sAngle, eAngle, aStep: Extended; out aFound: T2DExtendedArray): Boolean; extdecl;
|
function ps_FindDTMsRotatedSE(DTM: Integer; var Points: TPointArray; xs, ys, xe, ye: Integer; sAngle, eAngle, aStep: Extended; var aFound: T2DExtendedArray): Boolean; extdecl;
|
||||||
begin
|
begin
|
||||||
with CurrThread.Client do
|
with CurrThread.Client do
|
||||||
result := MFinder.FindDTMsRotated(MDTM.GetDTM(DTM), Points, xs, ys, xe, ye,
|
result := MFinder.FindDTMsRotated(MDTM.GetDTM(DTM), Points, xs, ys, xe, ye,
|
||||||
|
@ -51,7 +51,7 @@ begin
|
|||||||
Result := CurrThread.Client.MFiles.FileSizeMuf(FileNum);
|
Result := CurrThread.Client.MFiles.FileSizeMuf(FileNum);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function ps_ReadFileString(FileNum: Integer; out s: string; x: Integer): Boolean; extdecl;
|
function ps_ReadFileString(FileNum: Integer; var s: string; x: Integer): Boolean; extdecl;
|
||||||
begin
|
begin
|
||||||
Result := CurrThread.Client.MFiles.ReadFileString(FileNum, s, x);
|
Result := CurrThread.Client.MFiles.ReadFileString(FileNum, s, x);
|
||||||
end;
|
end;
|
||||||
|
@ -30,7 +30,7 @@ begin
|
|||||||
CurrThread.Client.IOManager.SetMousePos(X, Y);
|
CurrThread.Client.IOManager.SetMousePos(X, Y);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure ps_GetMousePos(out x, y: integer); extdecl;
|
procedure ps_GetMousePos(var x, y: integer); extdecl;
|
||||||
begin
|
begin
|
||||||
CurrThread.Client.IOManager.GetMousePos(X, Y);
|
CurrThread.Client.IOManager.GetMousePos(X, Y);
|
||||||
end;
|
end;
|
||||||
|
@ -21,12 +21,12 @@ begin
|
|||||||
Result := CurrThread.Client.MOCR.TextToMask(text,font);
|
Result := CurrThread.Client.MOCR.TextToMask(text,font);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure ps_TPAFromTextWrap(const text, font: String;out w,h : integer;out TPA : TPointArray); extdecl;
|
procedure ps_TPAFromTextWrap(const text, font: String;var w,h : integer;out TPA : TPointArray); extdecl;
|
||||||
begin
|
begin
|
||||||
TPA := CurrThread.Client.MOCR.TextToFontTPA(text, font, w, h);
|
TPA := CurrThread.Client.MOCR.TextToFontTPA(text, font, w, h);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function ps_TPAFromText(const text, font: String;out w,h : integer): TPointArray; extdecl;
|
function ps_TPAFromText(const text, font: String;var w,h : integer): TPointArray; extdecl;
|
||||||
begin
|
begin
|
||||||
Result := CurrThread.Client.MOCR.TextToFontTPA(text, font, w, h);
|
Result := CurrThread.Client.MOCR.TextToFontTPA(text, font, w, h);
|
||||||
end;
|
end;
|
||||||
|
@ -2159,7 +2159,7 @@ begin
|
|||||||
goodPoints[i] := not DTM.bp[i];
|
goodPoints[i] := not DTM.bp[i];
|
||||||
|
|
||||||
MaxX := x2 - x1;
|
MaxX := x2 - x1;
|
||||||
MaxY := x2 - y1;
|
MaxY := y2 - y1;
|
||||||
|
|
||||||
// Init data structure B.
|
// Init data structure B.
|
||||||
W := x2 - x1;
|
W := x2 - x1;
|
||||||
|
Loading…
Reference in New Issue
Block a user