Erro em linha instrucao SQL

Olá pessoal,

Seguinte gostaria de entender onde está o erro nesta instruçao

procedure TLogin.Button1Click(Sender: TObject);
var
strSqlLog: String;
begin
strSqlLog:= ´Select * from usuario,perfil WHERE usuario.nivel = perfil.id´;
strSqlLog:= strSqlLog + ´AND fantasia = ´ + #39 + (valorNome.text) + 39 ;
strSqlLog:= strSqlLog + ´AND senha = ´ + 39 + (valorNome.text) + 39 ;

menuPrin.QueryLogin.Close;
menuPrin.QueryLogin.SQL.Clear;
menuPrin.QueryLogin.sql.Add(strSqlLog);
menuPrin.QueryLogin.Open;