SCAR Code:
LineCount := GetDebugLineCount;
    Msg := 'Firstcolor: '+inttostr(firstcol)+', Nearest x, y: '+inttostr(firstpos.x)+', '+inttostr(firstpos.y)+', Time from *click* '+inttostr(getsystemtime - click)+' msec';
    if Pos('irst', GetDebugLine(LineCount)) > 0 then
      ReplaceDebugLine(LineCount, Msg)
    else
      Writeln(Msg);

I don't want it to spam "Msg", So I made this, but for my luck, it's not working...

Help?

Thanks.

Edit:

Closed, was missing
SCAR Code:
LineCount := GetDebugLineCount - 1;
instead of
SCAR Code:
LineCount := GetDebugLineCount;