int64 * Dezimalzahl - wie geht das?

[Tubos]

Hallo;

gibt es eine Möglichkeit, eine int64-Variable mit einer Dezimalzahl zu multiplizieren?

Zum Beispiel so:
[delphi]var a,b: int64;
begin
a:=...
b:=a * 0.4
...
end;[delphi]
Der Compiler sagt:
"Inkompatible Typen: int64 und extended".
Und a div 2.5 geht auch nicht weil div nur mit Ganzzahlen funktioniert.

Wie kann ich das sonst machen?d