Integerüberlauf bei Cardinalmultiplikation?

[NicoDE]

Workaround (der allerdings etwas Performance kostet)

Delphi-Quellcode:

function CmC: Cardinal;
var
  c1: Cardinal;
  c2: Cardinal;
begin
  c1 := 1000000000;
  c2 := 4;
  Result := Int64(c1) * Int64(c2);
end;