simpel Dec > Hex > Bin converter

Hejsa.
Jeg er i gang med at lave et lille konverterings program i delphi7 som han omregne fra Decimal >< Hex >< Binær.

jeg har da også fundet funktionerne til at omregne, men da jeg er lidt ny i det, har jeg ikke helt styr på det der at kalde en Function og Result, bruge det i min Procedure og så få resultatet af dette vist.

jeg har functionerne :
----------hex til decimal----------------------------------------
function HexToInt(HexNum: string): LongInt;
begin
  Result:=StrToInt('$' + HexNum) ;
end;
-----------decimal til binær-------------------------------------
function IntToBin ( value: LongInt; digits: integer ): string;
begin
    result := StringOfChar ( '0', digits ) ;
    while value > 0 do begin
      if ( value and 1 ) = 1 then
        result [ digits ] := '1';
      dec ( digits ) ;
      value := value shr 1;
    end;
end;
------------binær til decimal------------------------------------
function BinToInt(Value: String): LongInt;
var i: Integer;
begin
  Result:=0;
//remove leading zeroes
  while Copy(Value,1,1)='0' do
  Value:=Copy(Value,2,Length(Value)-1) ;
//do the conversion
  for i:=Length(Value) downto 1 do
  if Copy(Value,i,1)='1' then
    Result:=Result+(1 shl (Length(Value)-i)) ;
end;
---------------------------------------------

og indput er fra "Edit1.text" onchange
til output (resultatet) i "Edit2.text"
Dec til Hex var nem nok med den implanterede IntToHex, men sidder godt og grundigt fast nu, og har kikket overalt men kan ikke rigtig finde nogle brugbare eksempler/forklaringer.

-Christian