Zitat:
TryIntToStr
existiert nicht
Zitat:
val()
ist wohl eine Art TryIntToStr
Zitat:
inttostrdef()
Das ist lustig - man findet so seltsame dinge auch nur in Delphi lol - strtointdef hald.
Da ich ja weiß, daß ich ein integer erwarte, kann ich bei inttostrdef einfach auf einen wert stellen der über den erwarteten liegt - oder hald unter - jeh nachdem, dann hab ich bei string immer true. das sollte reichen und ist mir als extrem faulen programmiere auch genug lol.
man lernt nie aus ...
so mach ichs jedenfalls mal - danke.
Delphi-Quellcode:
if extracted <> 'timeout' then
if (strtointdef(extracted,21) > 20) then
begin
....
end;
Aber trotzdem wäre es interessant wie man das in Delphi lösen würde wenn ich diese funktionen nicht hätte.
Binäre addition der char's ist wohl immer noch die besste methode in dem fall oder?.
Und die einzige methode die mir da so auf die schnelle einfallen würde, wäre:
Delphi-Quellcode:
function addstringtoint (str :
array of char; laenge : integer) : integer;
var i,added : integer;
begin
for i := 1
to laenge
do
added := added + str[i];
//hab vergessen wie ich von einem character den ascii wert bekomme :)
addstringtoint := added;
end;
.
.
.
var addedstr : integer;
begin
addedstr := addstringtoint(mystring, lenght(addstring));
end;
Das sollte doch ebenfalls hinhauen oder?.
Arnulf