Junior wrote:
> As vezes a string é “ 123456”
>
> As vezes a string é “ 123456-A”
>
> As vezes a string é “ 1234-”
>
> Alguém tem uma sugestão de como eu posso fazer para pegar sempre os NÚMEROS,
>
> e desprezar o traço “-“ o que está a direita dele ?
Algo assim?
VPos := Pos('-', SuaString);
if VPos = 0 then
VPos := Length(SuaString) + 1;
SuaNovaString := Copy(SuaString, 1, VPos - 1);
Falta tirar os espaços em branco da frente. Trim?
--
Joao Morais
--
<<<<< 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
