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