Zitat von
Helmi:
Zitat von
Luckie:
Da wird dochnur CopyFileEx beschrieben...
Ja, hab ich auch gerade gesehen - Sorry!
Aber Luckie, kann es sein dass bei:
Delphi-Quellcode:
CEXM_MAXBYTES:
begin
ProgressBar1.Max := (Msg.LParam) shl 32) + Msg.WParam;
end;
ein Fehler drin ist und es so heissen muss:
Delphi-Quellcode:
CEXM_MAXBYTES:
begin
ProgressBar1.Max := (Int64(Msg.LParam) shl 32) + Msg.WParam;
end;
Nein. Man lese auch die Bemerkung die unter dem Code steht. TProgressbar.Max ist nur ein Integer.
Zitat:
[edit]
Und irgendwie geht bei dem Code gar nix! Ich hab mir das mal zur Laufzeit angeschaut!
Copy and paste von meiner HP und geht wunderbar. (OK, eine Klammer war zu viel, aber das solltest du auch noch hinbekommen.)