var
Texto : String;
T : TReplaceFlags;
begin
Texto := 'A c h e i';
Caption := StringReplace(Texto, ' ', '', [rfReplaceAll,rfIgnoreCase]);
end;
Eduardo Castro Alves
Analista de Sistemas
-----Original Message-----
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Luciano Alves de Oliveira
Sent: quinta-feira, 20 de abril de 2006 09:55
To: Delphi
Subject: [delphi-br] Retirar espaços do meio
Pessoal,
Tenho uma string provinda de um MaskEdit, onde no evento onChange estou utilizando um comando Locate. Acontece que se no MaskEdit o usuário digitar por exemplo '5 9', vai ocasionar um erro.
Então gostaria de retirar os espaços entre as strings para que fosse pesquisado como '59'.
Grato
Luciano
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
--
<<<<< 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 Termos do Serviço do Yahoo!.