Encoding - Delphi 2010 x Delphi 7

Delphi

23/05/2014

Oi pessoal, tudo bem?

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

Carla Batista

Curtidas 0

Respostas

Ricardo Araujo

Ricardo Araujo

23/05/2014

Está informações você salva no arquivo de log, e quando o usuário está realizando algum lançamento?
GOSTEI 0
Carla Batista

Carla Batista

23/05/2014

Oi rbbarreto, obrigado por responder.

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
Wesley Yamazack

Wesley Yamazack

23/05/2014

Olá Carlinha,

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
Nelson Santos

Nelson Santos

23/05/2014

ganhe dinheiro com softwares 3D com Delphi 7
http://www.3dsistemas.com.br
GOSTEI 0
Carla Batista

Carla Batista

23/05/2014

Oi Yamazack, realmente o problema era esse mesmo. muito obrigada!
GOSTEI 0
POSTAR