Tenta usar a função abaixo e veja se resolve:

function HandleNumericStr(const s: String): String;
begin
  Result := s;
  Result := StringReplace(Result, ThousandSeparator, '', [rfReplaceAll]);
  Result := StringReplace(Result, DecimalSeparator, '.', []);  
end;

Senão, tenta esta outra versão:

function HandleNumericStr(const s: String): String;
begin
  Result := s;
  Result := StringReplace(Result, '.', '', [rfReplaceAll]);
  Result := StringReplace(Result, ',', '.', []);  
end;


Sds.


________________________________
To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Tue, 23 Oct 2007 15:48:32 -0200
Subject: [delphi-br] Retirar mascara de um campo Text


Boa Tarde pessoal, estou com um problema tenho um campo onde coloco uma
mascara no edit usando a função FormatMaskText só que também preciso gravar
este dado no banco e o campo no banco é numeric e quando vou transformar de
string para float dá erro por causa da mascara então preciso tirar o ponto
que coloco no valor da mascara tipo, com a mascara fica 12.300 e preciso
gravar no banco 12300 sem o ponto.

Alguém poderia dar uma luz de como tirar essa mascara?

Marcelo Mendes de Oliveira
Analista de Informática
Tel.: + 49 3551-0177
Fax: + 49 3541-0423
IGUAÇU - celulose, papel s.a
www.iguacucelulose.com.br 
P Antes de imprimir pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
Before printing this document, think about your responsibility and care for
the ENVIRONMENT!

[As partes desta mensagem que não continham texto foram removidas]




_________________________________________________________________
Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver 
offline. Conheça  o MSN Mobile!
http://mobile.live.com/signup/signup2.aspx?lc=pt-br

Responder a