Fórum Encoding - Delphi 2010 x Delphi 7 #479926
23/05/2014
0
Estou com um problema, conforme vocês podem ver na imagem abaixo:
[img]http://arquivo.devmedia.com.br/forum/imagem/306068-20140523-110211.jpg[/img]
Tenho um método de um sistema feito em Delphi 7 e agora no Delphi 2010, não está funcionando. os caracteres com acento estão ficando 'doidos'. rsrs
class procedure TGerarLog.Add(const Value: string);
begin
FArquivo.Add(FormatDateTime('hh:mm:ss', Now) + ': ' +Value);
FArquivo.SaveToFile(FNomeArquivo);
end;
Alguém sabe como me ajudar?
Obrigada, bjs
Carla Batista
Curtir tópico
+ 0Posts
24/05/2014
Ricardo Araujo
Gostei + 0
25/05/2014
Carla Batista
olha, não entendi muito bem sua dúvida. o q estou precisando é saber como resolver para que o código do delphi 7, funcioine no Delphi 2010. pois os caracteres estão estranhos, conforme a foto anterior. vc tem ideia?
obrigada, bjs
Gostei + 0
27/05/2014
Wesley Yamazack
Seu problema está acontecendo, pois a partir do D2009, mudou toda essa parte de string no Delphi entrou a parte de Unicode. Logo, sua função precisa sofrer uma pequena alteração, veja como:
class procedure TGerarLog.Add(const Value: string);
begin
FArquivo.Add(FormatDateTime('hh:mm:ss', Now) + ': ' +Value);
FArquivo.SaveToFile(FNomeArquivo, TEncoding.UTF8);
end;
Veja se irá resolver o seu problema.
Um abraço e até mais.
Gostei + 0
27/05/2014
Nelson Santos
http://www.3dsistemas.com.br
Gostei + 0
16/06/2017
Carla Batista
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)