cefantacini

Fiz o teste no Demo tbém e deu o mesmo erro

Eu estou com o mesmo problema,uso o Delphi 2010, segue a msg. Já atualizei as DLL da pasta MingW...

Eu tbém nunca tinha tido problema. Com relação à permissão, eu tentei executar o programa com ADM e tbém não resolveu.... Com relação as DLL é isso mesmo que eu estou fazendo, usando as de 32, perguntei apenas por confirmação mesmo...

Eu até confirmei as configurações e permiti novo acesso para testar, mais nem teria como o problema ser esse, pq os detalhes da conta de envio de e-mail que uso no meu computador e no computador do cliente são os mesmos, no meu vai e no dele não, aliás, não só no meu o mail vai, em uma série de computadores vai, sempre usando a mesma conta de origem, apenas nessa máquina não vai, por isso acredito que deva ser alguma configuração da máquina. É um computador novo, recem adquirido e com windows 10.

Não tinha feito esse teste, fiz agora. Configurei o demo no meu computador, com a mesma conta de e-mail de origem, enviou normal. Copiei o demo para o computador do cliente, inclusive com o .ini com as configurações, tentei enviar de lá e de lá não foi.

Essa opção está descartada, pois é uma conta de origem minha, então, tem toda uma configuração já pronta, inclusive a opção de aplicativos menos seguros habilitada.

Tenho uma rotina de envio de e-mail da NFe que já está exaustivamente testada em muitos clientes. Tem um cliente meu que usa essa rotina. Esse cliente comprou um computador novo. Transferi o programa para a máquina nova e na máquina nova, passou a apresentar o erro ao enviar a nota por e-mail: SMTP Error: Unable to Login. A máquina não tem anti virus, já desabilitei o firewall, já atualizei as Dlls OpenSSL para a versão: 1.0.2.13 e o problema permanece. - Com relação às DLL devo usar as de 32bits, mesmo o win sendo de 64, pq meu sistema foi compilado no Delphi de 32, correto? - Gostaria da opinião do grupo sobre alguma forma de resolver o problema, uma vez que já está certo de que o problema é na máquina, pois a mesma conta de e-mail de origem é usada em várias outras máquinas, inclusive em outra máquina da rede desse mesmo cliente e envia normalmente.

Muito obrigado, tudo resolvido e entendido sobre as regras do fórum. Se quiser pode fechar o tópico.

Eu resolvi. Realmente eu salvava o arquivo txt pelo lazarus e depois ia abrir pelo lazarus e apresentava o problema. Acontece que a unit que eu estava usando para salvar e fazer a leitura eu tinha copiado de um projeto do Delphi e ela estava com a codificação cp 1252 - conforme a imagem. Imagino que era isso, pq mudei para UTF-8 e resolveu. Aproveitando, será que tem alguma forma de eu "setar" todas as units do projeto para UTF-8?

Se eu gravar um arquivo txt pelo DELPHI e abrir ele no bloco de notas, a codificação dele é ANSI. Se eu abrir esse arquivo pelo LAZARUS fazendo a conversão LConvEncoding.CP1252ToUTF8( eu leio ele normalmente com todos os caracteres acentuados. Se eu gravar um txt pelo LAZARUS e abrir ele no bloco de notas, a codificação dele é UTF-8. Se eu abrir esse arquivo pelo LAZARUS os caracteres acentuados ficam errados. Não teria que ser de forma automática, já que é UTF8 para UTF8? Eu tentei fazer algumas conversões mais não consegui. Se alguém tiver algum exemplo, agradeço!

Consegui resolver, como é um arquivo que possa ter sido salvo pelos meus sistemas ou por sistemas de terceiros que apenas são gerados via delphi, passei a inserir uma informação indicativa dentro do arquivo, que apenas eu insiro, ou seja, se o arquivo vier de outro sistema vai vir sem essa informação.

Eu consegui resolver, fazendo tudo via código, deu um pouco de trabalho mais funcionou, armazeno as letras digitadas numa String global e depois trabalho no evento keyUp do DBLookUpcomboBox para posicionar o ponteiro da tabela vinculada.

Não deu certo, na verdade eu já tinha testado essas propriedades, agra testei todas as combinações. Se alguem tiver alguma idéia, mesmo que seja usando outro componente...

Estou prosseguindo com a parte de compreensão do funcionamento do Lazarus e surgiu mais um caso aqui. No Delphi, eu setava as propriedades:do DBLookUpComboBox ListField Keyfield ListSource Vamos imaginar que na coluna do campo do List Field eu tenha os seguintes valores Acessorios Calcas Conjuntos Outros No Delphi, se eu entrar dentro do campo e digitar CO, ele vai para a opção Conjuntos, ou seja, ele vai procurando todas as letras da palavra No Lazarus quando eu digito C ele posiciona em Calcas e se eu digitar o O na sequencia ele vai para Outros, ou seja, ele "pega" só a primeira letra na busca Alguém tem alguma dica para resolver isso? Os clientes já estão tão acostumados com a forma do Delphi que seria complicado mudar isso...

Aparentemente resolvi alterando a escala de exibição do windows de 125% para 100%.

Será que tem alguma forma no Lazarus de o tamanho do form depois de compilado ficar do tamanho que está em tempo de projeto Form em tempo de projeto: mesmo form depois de compilado

Valeu Daniel, era isso mesmo, tinha uma rotina o evento DrawColumnCell, assim: begin //inverte a cor quando selecionado if gdSelected in State then begin TDBGrid( Sender ).Canvas.Brush.Color := clHighlight; TDBGrid( Sender ).Canvas.Font.Color := clHighlightText; TDBGrid( Sender ).Canvas.Pen.Color := Brush.Color; end else begin if DMBDComum.IbQrPesquisaPRO_DESATIVADO.AsString = '1' then TDBGrid( Sender ).Canvas.Font.Color := clRed; if DMBDComum.IbQrPesquisaPRO_SELECIONADO.AsString = '1' then TDBGrid( Sender ).Canvas.Font.Color := clBlue; end; TDBGrid( Sender ).DefaultDrawColumnCell( Rect, DataCol, Column, State ); end; a última linha, TDBGrid( Sender ).DefaultDrawColumnCell( Rect, DataCol, Column, State );, estava no lugar errado, tem que ser antes do end, assim: begin //inverte a cor quando selecionado if gdSelected in State then begin TDBGrid( Sender ).Canvas.Brush.Color := clHighlight; TDBGrid( Sender ).Canvas.Font.Color := clHighlightText; TDBGrid( Sender ).Canvas.Pen.Color := Brush.Color; end else begin if DMBDComum.IbQrPesquisaPRO_DESATIVADO.AsString = '1' then TDBGrid( Sender ).Canvas.Font.Color := clRed; if DMBDComum.IbQrPesquisaPRO_SELECIONADO.AsString = '1' then TDBGrid( Sender ).Canvas.Font.Color := clBlue; TDBGrid( Sender ).DefaultDrawColumnCell( Rect, DataCol, Column, State ); end; end;

Será que tem como saber se um arquivo de texto está saldo em ANSI ou em UTF8 quando abre o arquivo pelo Lazarus?

Resolvi fazendo um programa para migrar, ele lê o NONE e cria o UTF8.

Estou migrando meus sistemas para o Lazarus e me deparei com um problema. Eu filtro os registros que estão amarrados ao DBGrid, aí ele me mostra a informação assim: O Campo índice tem valor na segunda linha, mais não aparece logo após o filtro, porém se eu clicar sobre a linha, ele passa a aparecer.... Alguém teria ideia do que pode ser?

Aproveitando o tópico, no Delphi 7 quando eu apertava Shift+F12 para exibir a lista das Units, a telinha que abre para selecionar, já abria "setada" a unit que eu está ativa, no Delphi 2010 eu não consegui fazer isso, será que no lazarus isso existe essa opção para configurar? No exemplo ai eu cliquei ...

Eu consegui apenas fazendo pelo IBExpert, é que ele adiciona depois de todos os campos do tipo String o complemento: CHARACTER SET UTF8, tipo: Antes: PRO_COMB_DESCANP VARCHAR(100) Depois PRO_COMB_DESCANP VARCHAR(100) CHARACTER SET UTF8 Eu imagino que não deva ter como fazer isso via Gbak ou TIBRestoreService. Caso alguém já tenha conseguido fazer assim e puder me indicar o caminho, ajuda bem, pq aí não precisa de intervenção manual, dá pra automatizar tudo...

Estou migrando meus sistemas do Delphi para o Lazarus e estou com a seguinte dúvida. No Delphi, eu marcava a linha com F5 e ia acompanhando o conteúdo dos métodos só apontando o mouse sobre eles, tem como eu configurar o lazarus para fazer algo semelhante?

É o FDB, mais eu faço backup via delphi e restauro via lazarus com o comando: gbak -c -r -v -user SYSDBA -password masterkey amigrar.fbk migrado.fdb -fix_fss_metadata UTF8 mais ainda assim os caracteres ficam estranhos... PONCHO CA?ADOR AZUL CARTUCHO DE G?S CO2 CABO DE A?O o Character Set do Banco antes de gerar o FBK é NONE

Estou com o mesmo problema, será que alguém tem algum exemplo de como fazer a conversão no banco firebird ?