Como converter uma string em inteiro e dividir por 2 ?

Delphi

21/02/2003

Tenho uma variavel x que é do tipo string e seu valor é x=´20´
Quero transformar esta variável em inteiro e dividir seu valor por 2 e depois gravar novamente na variavel x.
Obrigado


Anonymous

Anonymous

Curtidas 0

Respostas

Nildo

Nildo

21/02/2003

x := ´20´;
x := inttostr(StrToInt(x) div 2);

agora x vai ser 10


GOSTEI 0
Anonymous

Anonymous

21/02/2003

Faça assim:

s:String;

.............

s:=InttoStr(StrtoInt(s)/2);

Abraços.


GOSTEI 0
POSTAR