direkt vor dem for i:= 1 to mem.size das rein:
Delphi-Quellcode:
progressbar1.position:= 0;
progressbar1.max:= mem.size;
direkt nach dem for i:= 1 to mem.size das rein:
progressbar1.step;
müsste stimmen, vielleicht auch von .Max 1 abziehen oder so-> ausprobieren!
gruss,
iaby