result := result + format('upper(%0:s) starting with :%1:sfilter ) ', [field, fieldname]); {do not localize}
fdmatchany:
result := result + format('upper(%0:s) containing :%1:sfilter ) ', [field, fieldname]); {do not localize}
fdmatchend :
result := result + format('upper(%0:s) like :%1:sfilter ) ', [field, fieldname]); {do not localize}
fdmatchexact :
result := result + format('upper(%0:s) = :%1:sfilter ) ', [field, fieldname]); {do not localize}
fdmatchrange :
begin
if fieldtype = ftstring then
begin
if startingvalue <> '' then
result := result + format('upper(%0:s) >= :%1:sstart)', [field, fieldname]); {do not localize}
if (startingvalue <> '') and (endingvalue <> '') then
result := result + ' and ('; {do not localize}
if endingvalue <> '' then
result := result + format('upper(%0:s) <= :%1:send)', [field, fieldname]); {do not localize}
end
else
begin
if startingvalue <> '' then