[SSL negotiation failed]

Estou tentando fazer o envio de e-mail pelo uniGUI usando o seguinte código: 

      IdSMTP1.Disconnect;

      Messagem := TIdMessage.Create(nil);
      Messagem.CharSet := 'ISO-8859-1';
      Messagem.Encoding := meMIME;
      Messagem.Clear;
      Messagem.ContentType := 'text/html';
      Messagem.ContentTransferEncoding := '16bit';
      Messagem.From.Name := UniMainModule.TMEMPRESANOME_FANTASIA.AsString;
      Messagem.From.Address := edtRemetente.text;
      Messagem.Priority := mpNormal;
      Messagem.Subject := edtAssunto.text;
      Messagem.Date := Now;
      Messagem.Recipients.Add;
      Messagem.Recipients.EMailAddresses := cbEmailPara.Text;
      Messagem.BccList.EMailAddresses := chkComboBoxEmail.Text;

      //Corpo
      Messagem.Body.Clear;
      Messagem.Body.Text := UniHTMLMemo1.Text;

      IdSMTP1.UserName := QPARAMETROS_WEBSMTP_USUARIO.AsString;

      IdSMTP1.Password := QPARAMETROS_WEBSMTP_SENHA.AsString;
      IdSMTP1.Host := QPARAMETROS_WEBSMTP_SERVIDOR.AsString;

      if QPARAMETROS_WEBSMTP_AUTENTICACAO.asstring = 'S' then
      begin
        IdSMTP1.UseTLS := utUseExplicitTLS; // utUseImplicitTLS;
        IdSMTP1.AuthType := satDefault;
        IdSMTP1.IOHandler := IdSSLIOHandlerSocketOpenSSL1;
        IdSSLIOHandlerSocketOpenSSL1.SSLOptions.Method := sslvTLSv1;
        IdSSLIOHandlerSocketOpenSSL1.SSLOptions.Mode := sslmClient;
      end
      else
      begin
        IdSMTP1.IOHandler := nil;
        IdSMTP1.UseTLS := utNoTLSSupport;
      end;

      IdSMTP1.Port := QPARAMETROS_WEBSMTP_PORTA.AsInteger;
      IdSMTP1.HeloName := IntToStr(UniMainModule.idusuario);
      IdSMTP1.Connect;
      IdSMTP1.Send(Email);
      IdSMTP1.Disconnect;
      Messagem.Free;

 

Recebo a seguinte mensagem de erro:

[Receber variável de um uniURLFrame]

Estou usando TuniURLFrame para montar alguns gráficos no meu sistema. Dentro do HTML do TuniURLFrame eu crio uma variável, "nome", que recebe um valor diferente para cada ponto onde o usuário clica no gráfico. Eu queria de pegar esse valor e jogar para um TuniEdit.

  

[Como fazer uniDBGrid focar na primeira linha automaticamente?]

Eu usei a função MeuDataclient.First e funcionou! Obrigado!

[Como fazer uniDBGrid focar na primeira linha automaticamente?]

Após um Refresh no DBGrid ele vai automaticamente para a ultima pagina, mas eu preciso que ele fica na primeira. 

[Tunicheckcombobox items checked?]

How to pick up only the items marked on the unicheckcombobox? How to know which items are checked?

[Como alterar tamanho da fonte de legenda do TuniChart]

Estou tentando trabalhar com TuniChart, quando eu altero a propriedade Legend > Font > Size no inspetor de objetivo ele simplesmente ignora e não faz alteração nenhuma.
PS.: Não estou herdando essas configurações de Font de nenhuma 'Parent'