Fórum passagem de parametro resulta em no argument for format ¬s #196512

procedure TFRMLogin.EDNickExit(Sender: TObject);
var
   sqlstring, valor : String;
begin
   if (EDNick.Text <> ´´) then
   begin
      DSAtende.DataSet.Close;
      DM.ZQAtende.Sql.Clear;
      sqlstring := ´SELECT atendente.ATCOD,atendente.ATNICK,atendente.ATSENHA,atendente.ATTIPO FROM atendente WHERE((atendente.ATNICK = :PATNICK))´;
      DM.ZQAtende.Sql.Add(sqlstring);
      valor := ´¬´+EDNick.Text+´¬´;
      DM.ZQAtende.ParamByName(´PATNICK´).AsString := valor;
      DSAtende.DataSet.Open;
   end;
end;