...
Code:
Label1.Caption := inttostr(i) + ' / ' + inttostr(Liste.Count) + ' Bilder kopiert.';
schreibe gehts nich ..
einfache Lösung:
Code:
Label1.Caption := inttostr(i) + ' / ' + inttostr(Liste.Count) + ' Bilder kopiert.';
application.processmessages;
komplexere Lösung:
Auslagerung des Kopiervorgangs in einen separaten Thread