Hexadecimal (help)

Delphi

12/10/2009

CONVERTENDO PARA HEXADECIMAL


O que há de errado nesse código?
Digito qualquer número e o resultado é sempre o mesmo: 4374760

var hexadecimal : Integer;
begin
   Visor.Caption := FloatToStr(hexadecimal);
   IntToHex(hexadecimal, 1);
   hexadecimal := StrToInt(Visor.Caption);
end;



Vlw a ajuda pessoal!



A proposito, alguem sabe como converter para decimal?

Ja converti para binário, facilmente..mas decimal não consegui!


Annubiss

Annubiss

Curtidas 0

Respostas

Annubiss

Annubiss

12/10/2009

Alguem, por favor!


Não consegui fazer isso de jeito nenhum!
Sempre da o mesmo resultado!


Vlw


GOSTEI 0
Annubiss

Annubiss

12/10/2009

Up!


=(


GOSTEI 0
Annubiss

Annubiss

12/10/2009

A J U D E M


GOSTEI 0
Facc

Facc

12/10/2009

A J U D E M


tenta isso

Function CharToHex( MyChar: Char ): String;
var escala: string;
res, num: integer;
Begin
num:=ord(Mychar);
escala:=´0123456789ABCDEF´;
res:=(num div 16);
result:=escala[res+1];
res:=(num-(res*16));
result:=result+escala[res+1];
End;

creio que no proprio forum já tenha algo parecido, pra isso existe o Pesquisar.


GOSTEI 0
Annubiss

Annubiss

12/10/2009

Obrigado cara!


Mas eu to no inicio do meu curso.. e ainda não aprendi a implementar funções no Delphi e se eu fizer isso meu professor vai complicar!

Eu precisaria algo comum, sem muitos detalhes!




Mas de qualquer forma, obrigado pela atenção!

Espero ajudas!


GOSTEI 0
Annubiss

Annubiss

12/10/2009

Ja descobriiiiiiiiiiiiiiiiiiiiiiiiiiiii


=)



Vlw..



Preciso agora para OCTAL, vasculhei a net e não achei ajudas!

POR FAVOR..

=)


GOSTEI 0
POSTAR