
moisesaugusto
-
Total de ítens
116 -
Registro em
-
Última visita
Community Answers
-
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.
-
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 .
-
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.
-
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.