delphi - Range check error while painting the canvas - Stack Overflow

I got a Range check error in this piece of code: .... The Perform procedure expects its second parameter to ...

stackoverflow.com