Bene ho capito come fare, ma provando mi da un problema, e cioè che il programma si blocca, ora posto il codice che ho inserito, la domanda è: è il programma che non funziona o e il codice:

codice:
library FloodFill;

uses
  SysUtils, Windows, Classes, Graphics;

var
   FloodGriglia: TBitmap;

function HexToTColor(sColor : string) : TColor;
begin
   Result :=
     RGB(
       StrToInt('$'+Copy(sColor, 1, 2)),
       StrToInt('$'+Copy(sColor, 3, 2)),
       StrToInt('$'+Copy(sColor, 5, 2))
     ) ;
end;

procedure Flood(x,y: integer; Color,FileName: string);
begin
    FloodGriglia.LoadFromFile(FileName);
    FloodGriglia.Canvas.FloodFill(x,y,HexToTColor(Color),fsBorder);
    FloodGriglia.SaveToFile(FileName);
end;

exports Flood;

{$R *.res}

begin
FloodGriglia:=TBitmap.Create;
end.
Allora ho dovuto prendere un funzione da internet che convertisse stringa esadecimale (una stringa che contenga il colore esadecimale) in TColor perchè il programma che uso può fornire solo stringe e numeri reali, string e real, e quindi il TColor non lo posso usare...