Concatenar informações em uma string

Delphi

03/09/2020

Olá pessoal, tudo bem ?

Então, estou precisando pegar 2 informações de uma entrada de dados e concatenar as mesmas, o que preciso exatamente é: Pegar os 5 primeiros dígitos do CEP e juntar com os 3 últimos, pois no meu BD está com informações para adicionar o Hífen, ai desejo tira-lo no relatório, tudo isso em Linguagem Pascal, alguém consegue me ajudar ?
Neto Silva

Neto Silva

Curtidas 0

Respostas

Raphael Antonio

Raphael Antonio

03/09/2020

Olá pessoal, tudo bem ?

Então, estou precisando pegar 2 informações de uma entrada de dados e concatenar as mesmas, o que preciso exatamente é: Pegar os 5 primeiros dígitos do CEP e juntar com os 3 últimos, pois no meu BD está com informações para adicionar o Hífen, ai desejo tira-lo no relatório, tudo isso em Linguagem Pascal, alguém consegue me ajudar ?


Não conheço muito pascal, mas vc precisa aplicar um substr que no pascal é o copy. Exemplo seu CEP com hifen esta na variável cep1 = 12345-678

cepSemHifen1 := copy(cep,1,5); // aqui vc vai armazenar 5 dígitos a partir do primeiro (12345)
cepSemHifen2 := copy(cep,7,3); // aqui vc vai armazenar 3 dígitos a partir do sétimo (678)

Aí é só concatenar

cepSemHifen := (cepSemHifen1 + cepSemHifen2);

Fiz assim passo a passo para explicar melhor, mas vc pode concatenar direto os copy em uma unica linha.

Não consigo testar aqui, mas é mais ou menos isso.

GOSTEI 0
Celso Lenon

Celso Lenon

03/09/2020

Olá pessoal, tudo bem ?

Então, estou precisando pegar 2 informações de uma entrada de dados e concatenar as mesmas, o que preciso exatamente é: Pegar os 5 primeiros dígitos do CEP e juntar com os 3 últimos, pois no meu BD está com informações para adicionar o Hífen, ai desejo tira-lo no relatório, tudo isso em Linguagem Pascal, alguém consegue me ajudar ?



CEP := StringReplace(CEP , '-', '',  [rfReplaceAll, rfIgnoreCase]);

GOSTEI 0
POSTAR