Depois desta função nunca mais tive problemas com o separador decimal.
function StringToFloat(pValue : String) : Extended;
var
Count : Integer;
Str : String;
begin
Str := '0';
for Count := 1 to Length(pValue) do
begin
if pValue[Count] in ['0'..'9', DecimalSeparator] then
Str := Str + pValue[Count];
end;
Result := StrToFloat(Str);
end;
Eduardo
----- Original Message -----
From: Jean Pierre
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, July 06, 2006 7:36 PM
Subject: [delphi-br] VALORES - VIRGULA ou PONTO....
Boa Noite...
Estou desenvolvendo um sistema que agora na implantação em diversos
computadores estou tendo
dificuldades com o bendito ponto e virgula em campos EDIT, DBEDIT, DBGRID
etc...
Qual a melhor maneira para tratar estes campos .... me ajudem por favor.....
Obrigado
Jean
Joinville -SC
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
