Code:
{.include srl/srl/misc/smart.scar}
{.include srl/srl.scar}
var
road: TPointArray;

Procedure DebugTPA(A : TPointArray; DC : integer);
var
 mx, my, pic, OldDC,i: integer;
begin
  GetClientDimensions(mx,my);
  Pic:= BitmapFromString(mx,my,'');
  OldDC := GetTargetDC;
  SetTargetDC(DC);
  for i := 0 to High(A) do
    FastSetPixel(Pic, A[i].x+mmx1, A[i].y+mmx1, 255);

  CopyCanvas(GetBitmapCanvas(Pic), GetClientCanvas, 0, 0, mx, my, 0, 0, mx, my);
  FreeBitmap(Pic);
  SetTargetDC(OldDC);
end;


begin


  //SetupSRL;

  SetTargetDc(SmartGetDC)
  FindColorsTolerance(road, 8161426, mmx1, mmy1, mmx2, mmy2, 15);
  DebugTPA(Road, SmartGetDebugDC);
  writeln(inttostr(high(road)));
end.
It finds points, but doesn't seem to draw on the smart debug canvas(yes I do have debug enabled) What did I do wrong?


Edit: nvm,
Code:
    FastSetPixel(Pic, A[i].x+mmx1, A[i].y+mmx1, 255); --->     FastSetPixel(Pic, A[i].x, A[i].y, 255);