Hallo!
Wie kann ich eine Hexadezimalzahl (in der Form &h41) mit Delphie in den Integerwert (hier 65) verwandeln? Bei Basic hieß das Val und bei Delphi?
Danke im Voraus.
Christian
Hi,
Bei Delphi heisst genauso. Val(S,var V; var Code:integer) oder
wenn als String vorliegt:
function HexToBin(Text, Buffer: PChar; BufSize: Integer): Integer
grüsse
Mathias
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Hi!
Danke! Kannst du aber vielleicht ein Beispiel machen?
procedure TForm1.Button1Click(Sender: TObject);
var
i,s:Integer;
begin
Edit1.Text := IntToStr(Hex2Int('41'));
end;
function TForm1.Hex2Int(hex: String): Integer;
var
i,count: Integer;
begin
val('$'+hex,i,count);
if count = 0 then result:= i
else result := -1;
end;
Sollte selbsterklärend sein.
Chris