Como te han indicado ya, se debe al tratamiento de cadenas UNICODE por Delphi 2010.
Deberías hacer un casting de uno de los dos parámetros de la función.
Prueba esto:
Código Delphi
[-]
if Pos(Column.FieldName, WideString(QAkg.SQL[QAkg.SQL.Count-2])) <> 0 then
...