Steht doch bereits im Procedure-Kopf:
procedure Faerben(C:TCanvas);
Canvas ist deine Zeichenfläche. Die Klasse TCanvas stellt dir Methoden zum Zeichnen zur Verfügung. Weitergehende Informationen findest du in deiner Onlinehilfe oder z.B. beim
Delphi-Treff.
Ich würde übrigens dringend davon abraten, Code aus dem Internet, den man nicht versteht, einfach zu kopieren und in eigene Anwendungen einzubauen, denn dabei lernt man meistens nichts. Als weitaus nachhaltiger hinsichtlich des Erlernens einer Programmiersprache hat es sich erwiesen, entsprechende Tutorials durchzuarbeiten, um die Funktionsweise der Komponenten, Methoden und Klassen, die benötigt werden, auch verstehen zu lernen.