[Помогите!] HexToStr

[Skrillex3]

собственно вопрос таков как из Hex переводить в String как текст?

[Zo_Om4eG]

Цитата: function HexToStr(HexStr : String; const Text : boolean = True) : string; var Hex : byte; sTemp : string; i : integer; begin Result := ''; if Length(HexStr) mod 2 <> 0 then Exit;

var N: string;
begin
N:=HexToStr(Edit1.text);
end;

[Skrillex3]

Цитата: Сообщение от Zo_Om4eG function HexToStr(HexStr : String; const Text : boolean = True) : string; var Hex : byte; sTemp : string; i : integer; begin Result := ''; if Length(HexStr) mod 2 <> 0 then Exit; var N: string; begin N:=HexToStr(Edit1.text); end;

ммм... клас

[=PaLeTiZaToR=]

var
  C: Cardinal;
begin
  C := $FFFFFFFF;
  ShowMessage(IntToStr(C));

помоему то...