Ir para conteúdo
  • Cadastre-se

moisesaugusto

Membros
  • Total de ítens

    116
  • Registro em

  • Última visita

Community Answers

  1. moisesaugusto's post in Componente AcbrFala was marked as the answer   
    Consegui compilar (como disse antes, uso Delphi 10.4 (Sidney ) , depois das seguintes alterações :   
    1 - Deletar a diretiva de compilação {$R ..\..\..\es\ACBrDiversos\ACBrFalaWaves\ACBrFala.FontRES } que está na linha 84 do projeto  Se alguém me explicar como a mesma funciona, agradeço --- pois não encontrei pesquisando no Google  ) .
    2 - Acrescentar no " uses " -- System.UITypes 
    3 - No evento "edValorKeyPress "  ( linha 195 )  deletar o código após o "then"  -- pois o DecimalSeparator não é aceito como identificador válido (tentei utilizar   FormatSetting.DecimalSeparator   -- de SysUtils e System.SysUtils porém também não foi validado ).
    4 - Alterei manualmente, na propriedade "OrigemArquivos" do componente Acbr/fala1 , o path dos arquivos .Wav, ou seja, no meu caso , "C:\ACBR\Fontes\ACBrDiversos\ACBrFalaWaves\"  
    5 - No evento "onClick" do button "bFalar", acrescentei " rbDir.Checked := true; " e dessa forma consegui compilar     ( parabéns ao autor pois a qualidade do som ficou excelente ) .
    6 - Dessa forma, creio que acrescentando arquivos .wav com o conteúdo que for interessante, resolve-se o problema de o aplicativo converter texto para voz, da forma como for desejado.
    7 Achei muito legal, pena que não me servirá, pois como eu disse, preciso compilar para uso em dispositivo mobile.
     
  2. moisesaugusto's post in Contagem de produtos componente ACBRNfe was marked as the answer   
    Solicito ao Sr. moderador que coloque " Resolvido " no tópico. 
    Solução :
    {Adiciona produtos}
      Contador := 0;        // variável Integer declarar no início da rotina 
      Itens    := 0;           // variável Integer
      Contador := AcbrNfe2.NotasFiscais[0].NFe.Det.Count ;
      ACBrNFe1.NotasFiscais[0].NFe.Det.Clear;
      While Itens < Contador do
      begin
      ACBrNFe1.NotasFiscais[0].NFe.Det.Add;
      ACBrNFe1.NotasFiscais[0].NFe.Det[Itens].Prod.cProd  :=
        ACBrNFe2.NotasFiscais[0].NFe.Det[Itens].Prod.cProd ;
    .................    // outras propriedades preenchidas .....
    //   finalzinho da rotina
      Itens    := Itens + 1;
      ShowMessage ('Número de produtos = ' + InttoStr (Contador ) +
        #13 + 'Variável Itens = ' + InttoStr ( Itens ));
      end;
    De qualquer forma, ficam meus agradecimentos a alguém que possa haver lido e tido a intenção de ajudar-me ( o que vale é a intencão ).
    Abraços a todos .
     
  3. moisesaugusto's post in Erro ao associar Danfe ao componente AcbrNfe was marked as the answer   
    A fim de evitar que fiquem perdendo tempo, informo que consegui resolver o meu problema da seguinte forma.
    Em vez de fazer a associação do componente DanfeACbr ao componente da nota fiscal, fi-lo na propriedade " AcbrNfe "    do próprio componente DanfeFR ( ou DanfeRL ).
     
    Portanto por favor sr. Moderador, considero o tópico ' RESOLVIDO ".
    De qualquer forma, ficam aqui meus agradecimentos a todos que tenham visualizado e tiveram a intenção de auxiliar-me.
     
  4. moisesaugusto's post in Falha No Schema Da Nfe was marked as the answer   
    Valeu Juliomar. Mas parece que estou conseguindo resolver o problema. Caso não consiga, então postarei o arquivo texto a que me referi acima.De fato, no " mais opções " aparece a possibilidade de se anexarem arquivos.
    Então, colocarei " resolvido " no tópico.
     
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.