[virmaker]

имеется код

Код:

var 
f:tstringlist;
f1:tstringlist;
 
i:integer;
begin
f:=tstringlist.create;
f1:=tstringlist.create;
 
f.LoadFromFile('filename');
f1.LoadFromFile('filename');
 
for i:=0 to f.count-1 do
    for j:=0 to f1.count-1 do
           begin
       if f.string[i]= f1.string[j] then form1.memo1.line.add(f.string[i]);
         
           end;        
 
end;

но он выдаёт ошибку
if f.string[i]= f1.string[j] then form1.memo1.line.add(f.string[i]);
identifier expected bat 'STRING' found
Что я не правильно сделал?