Ganz einfach: Mit einem Thread oder (noch einfacher) einem
Task Hallo Günther, Danke vielamsl für die Antwort
Habe nun das ganze versucht mit einem Task. Dies funktioniert teilweise.
Die Form reagiert und zb ein Animiertes Gif bewegt sich nun während des Entpackens / während des Tasks. (Dies war ja mein Ziel)
Ist der Task jedoch fertig, so sind alle Objekte auf der Form (zb RadioGroup oder die Images) komplett "kapput" die Farben verändern sich ganz merkwürdig und Schriftarten verschwinden. etwa 30 sek später stürzt das Programm dann ab (reagiert nicht mehr) (Siehe Bild)
Weisst du oder sonst jemand was ich falsch mache?
Ich habe dieses Beispiel übernommen:
Delphi-Quellcode:
var
aTask: ITask;
begin
aTask := TTask.Create (procedure ()
var
...
...
begin
//Hier kommt dann der Code zum entpacken des Zip Files
end);
aTask.Start;
end;