Zitat von
sirius:
Delphi-Quellcode:
SchritteGesamt:=Sectors div (Length(Buffer) div SectorSize) * FPassCount ;
SchritteAktuell:=Pos div (Length(Buffer) div SectorSize) +
Sectors div (Length(Buffer) div SectorSize) * Pass;
Prozent:=trunc((SchritteAktuell/SchritteGesamt) *100);
Kann man aber noch vereinfachen:
Delphi-Quellcode:
SchritteGesamt:=Sectors * SectorSize * FPassCount div Length(Buffer);
SchritteAktuell := (SectorSize div Length(Buffer)) * (Pos + Pass*Sectors);
Prozent:=trunc((SchritteAktuell/SchritteGesamt) *100);
Ich hoffe, da ist jetzt kein Fehler drin.
