Código Delphi [-] var roman, cHackAll: Cardinal; // UNSIGNED egostar: Byte; // UNSIGNED [0..255] ... begin // roman := 11621; // cHackAll := 337; Thread(cHackAll, Last); cHackAll := -Abs(cHackAll); // cHackAll := 4294966960; egostar := roman + cHackAll; // egostar := 20;
var roman, cHackAll: Cardinal; // UNSIGNED egostar: Byte; // UNSIGNED [0..255] ... begin // roman := 11621; // cHackAll := 337; Thread(cHackAll, Last); cHackAll := -Abs(cHackAll); // cHackAll := 4294966960; egostar := roman + cHackAll; // egostar := 20;