Hola jafera.
Primero, en la línea,
Código Delphi
[-]OrdenarGrid.SQL[1] := 'WHERE B.IDPROVEIDOR = A.IDPROVEIDOR AND UPPER (C) like ''%'+AnsiUpperCase(Edit1.Text)+'%''';
estas tratando a "C" como un caracter no como la variable cuyo valor (supongo) queres pasar a mayúscula.
Segundo te aconsejo el uso de parámetros frente a la composición de cadenas
Saludos
