![]() |
HEX Wertin in Binären Wert umwandeln
aloha zusammen,
wie kann ich mir denn hex wert "3D" in den binären wert "00111101" mit einem delphi programm umwandeln lassen? in excel heißt die funktion "hex2bin" (befindet sich in den analysis add ins) falls das jemanden weiterhelfen sollte... gibt es für delphi eine ähnliche funktion??? |
Re: HEX Wertin in Binären Wert umwandeln
function HexToBin(Text, Buffer: PChar; BufSize: Integer): Integer
Grüße Klaus |
Re: HEX Wertin in Binären Wert umwandeln
die funktion hatte ich auch schon gefunden, aber so wie ich in ein paar beiträgen hier im forum gelesen habe, wird da wohl nicht das richtige rasukommen! bzw. nicht der wert denn ich gern hätte!
|
Re: HEX Wertin in Binären Wert umwandeln
folgendes hab ich über google gefunden...
und es funzt au :-)
Delphi-Quellcode:
function tmain_form.Hex2Bin(Hexadecimal: string): string;
const BCD: array [0..15] of string = ('0000', '0001', '0010', '0011', '0100', '0101', '0110', '0111', '1000', '1001', '1010', '1011', '1100', '1101', '1110', '1111'); var i: integer; begin for i := Length(Hexadecimal) downto 1 do Result := BCD[StrToInt('$' + Hexadecimal[i])] + Result; end; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 17:39 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz