Binär in Hexadizmal

[Arthur]

hallo,
könntet ihr mir bitte helfen((habs erst seit paar tage , brauche es für die Schule )), wie man
-Dezimal in hexadezimal
-Binär in Hexadezimal
-Binär in Dezimal
-hexadezimal in binär
-hexadezimal in Dezimal
schreibt

also es sollte so aussehen wie das hier:
----------------------------
Dezimal in Binär

bin:= '';
dez:= strtoint(Edit1.text);
while dez <> 0 do
begin
R:= dez mod 2;
bin:= IntToStr(R)+bin;
dez:= dez div 2;
end;
Label1.caption:= bin;
----------------------------
mit FOR DO und While DO