Tscha, die kleinen Vergesslichkeiten,
wenn man nur das Nötigste schreiben will.
Also hier das fehlende Array:
Delphi-Quellcode:
Const HexArray : Array[0..15]Of Char =
('0','1','2','3','4','5','6','7',
'8','9','A','B','C','D','E','F');
Ich hoffe, jetzt gehts.
Gruß Susi