Das ProcessMessages wäre sinnvoll, wenn zwischendrin noch mehr aktualisiert werden soll, kann aber ggf. doofe Nebeneffekte haben (z.B. ganze andere große lange Verarbeitungen auslösen, wenn man deren Auslöser nicht explizit deaktiviert hat.) Die unmittelbare Lösung, die dem Problem am angemessensten wäre, ist:
Delphi-Quellcode:
procedure TAuswExcelll.BuExGrClick(Sender: TObject);
var
Artikel, Wznr, inter, Dateiname : String;
i,j,a,ii,gefunden,letztezeile,summe, zeile : integer;
begin
LblAchtung.Caption:='Bitte warten!';
LblAchtung.Repaint; // <-------------------- !!!!
.
.
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)