Problemas com programação de Login

EDataBaseError with message 'Token unknown - line 1, char 74 LOGIN ', Process stopped. Use Step or Run to continue

Estou usando DBExpress com SQLConnection , SQLQuery , DatasetProvider, ClientDataSet , DataSource

procedure TLogin.Button1Click(Sender: TObject);

var

strSqlLog: string;

begin

 strSqlLog:= 'SELECT * FROM TB_USUARIO, TB_PERFIL WHERE TB_USUARIO.NIVEL = IDPERFIL';

 strSqlLog:= strSqlLog + 'AND LOGIN = ' + #39 + (ValorNome.Text) + #39 ;

 strSqlLog:= strSqlLog + 'AND SENHA = ' + #39 + (valorSenha.Text) + #39 ;

 

 menuPrin.qLogin.Close;

 menuPrin.qLogin.SQL.Clear;

 menuPrin.qLogin.SQL.Add(strSqlLog);

 menuPrin.qLogin.Open;

 

 if(menuPrin.qLogin.RecordCount) = 1 then

 begin

 menuPrin.StatusBar1.Panels[2].Text:= ' ' + 'Usuário: ' + login.ValorNome.Text +

 ' - ' + menuPrin.qLogin.FieldByName('DEPTO').AsString;

 login.Close;

 end;

end;

Qual é o problema não consigo solucionar ? O Campo LOGIN E SENHA EXISTE NO BANCO FIREBIRD 1.5