Apagar zeros a esquerda
Olá
Possuo uma tabela Paradox e um campo chamado código que aceita 6 caracter sendo que os dois primeiros caracter do registro são dois numeros zero ´00´, estou precisando de uma rotina que apague o primeiro zero ´0´ do registros, se alguem me puder mandar um exemplo agradeço desde já
Possuo uma tabela Paradox e um campo chamado código que aceita 6 caracter sendo que os dois primeiros caracter do registro são dois numeros zero ´00´, estou precisando de uma rotina que apague o primeiro zero ´0´ do registros, se alguem me puder mandar um exemplo agradeço desde já
Misael
Curtidas 0
Respostas
Aroldo Zanela
27/04/2003
Misael,
Basta converter o valor string para inteiro e vice-versa. Veja:
Basta converter o valor string para inteiro e vice-versa. Veja:
tbValor.Value := IntToStr(StrToInt(tbValor.Value));
GOSTEI 0
Rebel_inside
27/04/2003
[quote:0ab14a774b=´Aroldo Zanela´]Misael,
Basta converter o valor string para inteiro e vice-versa. Veja:
[/quote:0ab14a774b]
por segurança, faça o seguinte:
isso irá evitar as malditas exceções (´...´ is not a valid integer value)
[]´s
Basta converter o valor string para inteiro e vice-versa. Veja:
tbValor.Value := IntToStr(StrToInt(tbValor.Value));
por segurança, faça o seguinte:
tbValor.Value := IntToStr(StrToIntDef(tbValor.Value, 0));
isso irá evitar as malditas exceções (´...´ is not a valid integer value)
[]´s
GOSTEI 0