Hello > slist:=TStrings.Create; Do not create a TStrings directly, it's an abstract class. Use a descendant instead (ie : TStringlist) > s:=sl.Names[i]; Replace this line by s:=s[i]; Cheers, Christophe