[Delphi] Komponent tłumaczący Hex'y

Wiem na 100%, że jest komponent do Delphi7 tłumaczący zwykły tekst do hexów i odwrotnie ;)

Ma go ktoś może?

---

Po co komponent. Masz tu przykład zamiany tekstu na HEX:
Postaw na formę Edit, Button i Memo.

procedure TForm1.Button1Click(Sender: TObject); var  s, s2 : string;  i     : integer; begin  s := Edit1.Text;  s2 := '';  for i :=1 to length (s) do  begin    s2 := s2 + IntToHex(Ord(s[i]), 2)+ ' ';  end;  Memo1.Lines.Add(s2); end;


(...)

obejrzyj sobie demko ResXPlor czy jakos tak ;) ma fajny podglad w hex :)

I jak wyczyścić memo1?

---

(...)
memo1.Clear; :>


Możesz mi jeszcze podać procedure w drugą stronę?
Z Hex'ów na tekst.
I jak wyczyścić memo1?

zanotowane.pl

doc.pisz.pl

pdf.pisz.pl

zsf.htw.pl