Schleifen Problem...Programm reagiert nicht

[agm65]

Guten Abend Leute,
habe ein Problem mit einer Schleife und dem Indy Pop3 Client...

CODE:

Delphi-Quellcode:

for i := 1 to 10 do 
begin
IdPOP31.Delete(i);
label1.Caption  := (inttostr(i));
end;

was kann ich jetzt machen, damit er mir in dem label auch nach jeder gelöschten mail
einen wert angibt ? bei mir gibt er mir erst einen wert an nachdem er alle emails gelöscht hat.

thx cu

[edit=Luckie]Du bist jetzt schon so lange dabei, du solltest eigentlich die Delphi-Tags kennen. Mfg, Luckie[/edit]

[Luckie]

Application.Processmessages.

[agm65]

thx das geht echt !

[Thanatos81]

Bei einer 1 to 10 Schleife noch kein Problem. Aber wenn du mal größere Schleifen hast (z.B. 1 to 1000000) und ein Schleifendurchlauf nicht lange dauert, würde ich Application.ProcessMessages nicht in jedem Durchlauf sondern z.B. nur in jedem 10ten machen:

Delphi-Quellcode:

if i mod 10 = 0
  then Application.ProcessMessages;

Hatte sonst teilweise den Eindruck, dass das ganze seehr langsam wird.

Steinigt mich bitte, wenn ich gerade absoluten Müll schreibe, war nur subjektives Empfinden :-D

[agm65]

ist auch ne gute idee danke....aber die ultimative lösung ist: von den indy komponenten:
indy-misc -> idantifreeze

damit gehts 1000% ! danke euch allen cu