Bildershow mit JvGIFAnimator oder TImage

[ninja]

hallo,
ich habe probleme mit meiner schleife

Delphi-Quellcode:

begin
        begin
        if i = Memo1.Lines.Count then
        i := 0;
        while i < Memo1.Lines.Count do
                begin
        filename:=(dir + '\' + Memo1.Lines[i]);
        JVGifanimator1.Image.LoadFromFile(Filename);

        delay(12000);

        i := i + 1;

                end;
        end;


end;

und zwar zeigt er alle bilder nacheinander an, aber er fängt nicht von vorne an , sondern bleibt beim letzten bild "hängen".
thx ninja

[ninja]

hab mal was gedreht:

Delphi-Quellcode:

begin
        begin
        while i < Memo1.Lines.Count do
        begin
        filename:=(dir + '\' + Memo1.Lines[i]);
        JVGifanimator1.Image.LoadFromFile(Filename);

        delay(12000);

        i := i + 1;
        if i = Memo1.Lines.Count then
        i := 0;
        end;
        end;


end;

jetzt f4n2t56n5ert es.
allerdings reagiert die exe ziemlich langsam wenn ich das programm über "beenden" beenden möchte, während noch die "Bildershow" abläuft. muß ich da vorher noch was beenden??