[Delphi] Hex

Haluś!
Mam pytanko podobnej terści co do zadanego z 2 miesiące temu. Posiadam sobie komponenty Edit1, Button1, i Button2. Zdarzenie OnClick Button1:
Edit1.Text := IntToHex(StrToInt(Edit1.Text), 6);
A do Button2 OnClick'a:
var
Hex : Integer;
begin
Hex := $ + StrToInt(Edit1.Text);
Edit1.Text := IntToStr(Hex);
I tutaj właśnie jest błąd, jeżeli w Edit1 jest jakaś cyfra zhexowana (z literkami) to generuje błąd że to nie jest integer. Jakiego użyć polecenia?? Z góry dzięki za podpowiedzi. Pa

--
"Jeżeli myślisz że jest dobrze... kompletnie się mylisz"
www.PAST-SKRIPTUM.prv.pl

Hmm .. oglnie mi sie to nie widzi, zrobil bym tak:
var
Hex : Integer;
S : String;
begin
S:= '$' + Edit1.Text;
Hex := StrToInt(S);
Edit1.Text := IntToStr(Hex);
Moze zadziala ... kylix mi sie otwiera 4 minuty :/

--
Pozdrawiam [cya] Tomasz K.

Dzięki :)))))))))) Działa!!!!!!!!!!!!!!!!!!!!!!!!!!!!! :):):):):):):):):):):):)

--
"Jeżeli myślisz że jest dobrze... kompletnie się mylisz"
www.PAST-SKRIPTUM.prv.pl