Wieso willst Du aus der Zahl nun wieder einen String machen? Das brauchst Du doch erst ganz am Schluss, wenn Du das Ergebnis in binärer Schreibweise wieder ausgeben willst. Aber wir können uns das auch einfacher machen, ich weiß nur nicht, ob das Deinem Lehrer/Ausbilder gefällt.
Delphi-Quellcode:
var
Zahl: integer; //oder Cardinal oder oder...
begin
...
if TryStrToInt('$' + h, Zahl) then
writeln(IntToBin(Zahl));