[Delphi]Str, Int, Float, Hex

[RickKM 2]

Olá pessoal, hoje vou ensinar coverter tipos String to Integer, Integer to String, String to Float, Float to String e Integer to Hexa.

 

String to Integer "strtoint()" e Integer to String "inttostr":

 

Intro: Esse comando transforma texto de edits em números decimais como 10. Exemplo de calculo de Adição:

var

A,B: Integer;

begin

A:= strtoint(edit1.Text); // Converte os números do edit em Decimal

B:= strtoint(edit2.Text); // Converte os números do edit em Decimal

showmessage('Resultado: '+inttostr(A+B)); // Faz a conta e converte em Texto

end;

 

String to Float "strtofloat()" e Float to String "floattostr"

 

Intro: Esse comando transforma texto de edits em números com ponto flutuante como 10,22. Exemplo de calculadoras:

var

A,B: Real;

begin

A:= strtofloat(edit1.text);

B:= strtofloat(edit2.text);

showmessage('Resultado: '+floattostr(A/B)); //A dividido por B,

end;

 

// Se A = 1 e B = 3 vai sair a mensagem vai ser "Resultado: 0,3333333..."

 

Integer to Hexa "inttohex"

 

Intro: Converte Decimal( Integer ) para Hexadecimal como 124 = 0000007C, Exemplo:

begin

ShowMessage('124 decimal = '+IntToHex(124, 8));

end;

[~OwneR~ 8]

Pra converter de Hexa para Integer:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se