Go to English page

ViaThinkSoft CodeLib

Dieser Artikel befindet sich in der Kategorie:
CodeLib → Programmierhilfen → Delphi

CodeLib Delphi: BinaryStringToHexDump()
function BinaryStringToHexDump(ABinaryString: string): string;
var
  i: integer;
begin
  for i := 1 to Length(ABinaryString) do
  begin
    result := result + IntToHex(Ord(ABinaryString[i]), 2);
    if i <> Length(ABinaryString) then
      result := result + ' ';
  end;
end;
Daniel Marschall
ViaThinkSoft Mitbegründer
Autor: Daniel Marschall
Datum: 21. Januar 2010
Gelesen: 21.811 Mal