Virgola Ou Ponto! S.o. Usa Virgola, Mas Os Txt Ñ!

[romario]

Virgola ou Ponto! S.O. usa virgola, mas os txt não!

como fazer o Delphi trabalhar c/ pto????

[Graymalkin]

Virgola ou Ponto! S.O. usa virgola, mas os txt não!

como fazer o Delphi trabalhar c/ pto????

O que seriam "os txt"? As caixas de texto? TEdits? Se for, você pode fazer o seguinte (no evento OnKeyPress):

  if key='.' then key:=',';

Abraços,

Graymalkin

[romario]

são arquivos q de dados que estão gravados no meu hd.... meu programinha abre esses arquivos os converte para outro formato txt também...

[Graymalkin]

Então, o que você quer exatamente? O Delphi já trabalha com ponto ao invés de vírgula. Sendo que ao ler do arquivo você pode ler como string e gravar, mantendo inalterado o ponto ou vírgula que esteja no arquivo original.

Abraços,

Graymalkin

[romario]

eu estou fazendo um programinha pra conversão de formatos da disposição de dados de um txt para outro...

por exemplo: dentro do txt de origem, tem lá uma coluna com um valor 56.66

só que no arquivo de saída, eu tenho que converter esse valor para 56.6600

isso eu consigo fazer atravéz do FormatFloat('0.0000',56.6600)....funciona beleza quando meu sistema operacional esta configurado para .(ponto) nas as cadas decimais...., mas quando meu S.O esta configurado com virgola para os decimais, zoa tudo... o programa trava... e da a seguinte mensagem:

" '56.6600' is not a valid floating point value"

valeu!

[Graymalkin]

Bom, então leia como string e garanta que a vírgula (é com "u"...) ou o ponto sejam trocados pelo separador decimal padrão do sistema. Já existe uma variável com esse caracter, veja:

showmessage(DecimalSeparator);

E para fazer a mudança, você pode usar a função StringReplace(). Daí, bastará converter para float e usar a função que você já usa (FormatFloat()).

Abraços,

Graymalkin

[romario]

valeu cara! Deu certo! usei o StringReplace e o DecimalSeparator... perfeito!

[Progr'amador]

RESOLVIDO...