Zitat von
Nils_13:
@sirius:
Dein Code müsste laut deinem Edit dann doch funktionieren. Er liefert bei 9C aber 0 zurück.
funktioniert bei mir einwandfrei:
Delphi-Quellcode:
function hextodez(s:string):integer;
var l,c:integer;
begin
val('$'+s,l,c);
result:=l;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
memo1.lines.add(inttostr(hextodez('9C')));
end;
-->156