teilstring ändern(teil in einem html code ändern)

[rennkuckuck]

hallo
ich habe so 200 *.html files.
in jedem html file sind bilder drinnen. nun hat sich der pfad geändert wo die bilder abgelegt sind.
früher war es /gif/
und jetzt ist es /gifs/
wie kann ich nun in jeder datei suchen wo ich /gif/ finde und das durch /gifs/ ersetzen.
habe schon mal angefangen aber ich weis nicht wie ich sage dass ich nur den bestimmten teil des strings meine.
hier mal mein quelltext:

Delphi-Quellcode:

 SetLength(StrA,0);        
 FileIn := '*.html';                 
 StrA := '/gif/';                       
 StrA  := UpperCase(StrA);
 rline:='';


 AssignFile(fr, FileIn);
 Reset(fr);                
 
 while not eof(fr) do
   begin

    readln(fr, rline);
    rline := UpperCase(rline);                            
    rline := Trim(rline);
    Found := True;                                          

    For I := 1 to (Length(StrA)-1) Do       
    Begin
      If Pos(StrA[I],rline) = 0 Then 
{....wie spreche ich hier den teilstring an ....also genau das stück was ersetzt werden soll}                      
         Begin
          Found := False;                                    
          Break;                                             
         End;
     End;  {For I}

   If Found then
    begin
{.....wie ersetzt man das dann}
    end;

  CloseFile(fr);

danke schonmal für antworten
ich hoffe das thema passt in das forum
gruß rennkuckuck