Int64-Variablen im Verhältnis auf Integer-Variablen laden

[cruiser]

Wie wäre es PB_Position und PB_Max div high(Integer) oder div MaxInt zu rechnen?

also

Delphi-Quellcode:

with Progressbar do
  begin
    Max      := PB_Max div high(Integer);
    //Min      := PB_Min; << kannsu auch weglassen, wenn es 0 bleibt
    Position := PB_Position div high(Integer);
  end;