Selecionar texto ate a virgula

Delphi

22/03/2005

Amigos, estou querendo o seguinte: Tenho uma tabela onde existe o endereco de varios clientes e eu queria pegar apenas o endereco, sem o numero. exemplo: Endereco do cliente: Rua 13 de maio, 45. Gostaria que retornasse apenas o endereco: Rua 13 de maio. Como eu consigo isso? Agradeco a ajuda de todos.


Aflsilva

Aflsilva

Curtidas 0

Respostas

Kotho

Kotho

22/03/2005

utilize e função Copy (para selecionar parte do texto) e Pos (para retornar a posição da primeira ocorrência de um caracter):

str := Copy(str, 1, Pos(´,´, str) -1);

No entanto, tome cuidado, pois a função Pos retornará 0 (zero) se não encontrar o caracter, então seria bom ter um IF antes de executar esse comando...


GOSTEI 0
POSTAR