hilfe beim übersetzen einer php function in delphi

[agm65]

okay, bis hier hin geht alles...nur das ende will nicht:

Delphi-Quellcode:

tmp := copy(md5Print(md5string(value)), 1, 13) + InttoStr(StrToInt(value) * 645);
//+ copy(strtoint(value) / 7)), 1, 5);