diff --git a/Extensions/dtm_editor.sex b/Extensions/dtm_editor.sex index 54df28d..945c9b5 100644 --- a/Extensions/dtm_editor.sex +++ b/Extensions/dtm_editor.sex @@ -609,7 +609,7 @@ begin if FindColorsTolerance(Points, getColour, 0, 0, bmpBuffer.Width - 1, bmpBuffer.Height - 1, getTolerance) then bmpOverlay.DrawTPA(Points, MarkCol); - SetImageTarget(h);} + SetImageTarget(h); UpdateBitmap(True, False); end; diff --git a/Includes/mml.simba b/Includes/mml.simba index 39c0b57..3ea328d 100644 --- a/Includes/mml.simba +++ b/Includes/mml.simba @@ -38,7 +38,7 @@ end; function FindDTMs(DTM: Integer; var p: TPointArray; xs, ys, xe, ye: Integer): Boolean; begin with Client do - result := MFinder.FindDTMs(MDTMs[DTM], p, xs, ys, xe, ye); + result := MFinder.FindDTMs(MDTMs.GetDTM(DTM), p, xs, ys, xe, ye,0); end; procedure FreeDTM(DTM: Integer); @@ -53,5 +53,15 @@ end; function AddDTM(const d: TMDTM): Integer; begin - Result := Client.MDTMs.AddDTM(d); + Result := Client.MDTMs.AddMDTM(d); +end; + +function GetDTM(const index : integer) : TMDTM; +begin + result := Client.MDTMs.GetDTM(index); +end; + +function FindColorsTolerance(var Points: TPointArray; Color, xs, ys, xe, ye, Tolerance: Integer): Boolean; +begin; + result := Client.MFinder.FindColorsTolerance(points,color,xs,ys,xe,ye,tolerance); end;