Locating substring in field

Quote
>I want to create a function witch search for a substring anywhere in a
>field
>For example if the field Society contains "Bart SIMPSON Industry" i want
>to find it with only "SIMPS"

Try

function IsIncluded ( const SubStr: string;
                      const FieldText: string) : boolean;
begin
  Result:=pos(SubStr,FieldText)>0;
end;

Is this just what you wanted ?

Serguei.