Necesito ayuda para un prgrama que enumere los colores

[Kandorf]

Eso ^^ las había visto por ahí alguna vez, pero he estado buscándolas durante más de media hora y no las he encontrado.
Uno, eso del exit es un apaño de lo que hace C xD pero está genial, yo para que me resulte más agradable a la vista lo pondré de esta manera xD:

Código Delphi [-]
if Imagen.Canvas.Pixels[X+i,Y+j]=EdtColor.Color then begin
    Result:= True; Exit; end;

Es por el royo psicológico xD, como se suele hacer con el "fflush(stdin);" en C, después de pedir un valor por teclado. En fin...
Una cosa que no hace Pascal (Bueno, también lo puede hacer, con apaño) es que el "for" de C tiene una comprobación de verdad, en Pascal sólo incrementa una variable ^^.
Un saludo, muchas gracias por la gran ayuda con la que me estás obsequiando.