Shockwaveflash-Komponente beenden? (EAccessViolation)

[litotes]

Hallo,

folgendes Problem mit Shockwaveflash-Videos:
Ich kann zwar ein Video abspielen, das zweite Video
auf derselben Form wird aber nicht abgespielt, sondern
das erste wird weiter abgespielt. (video1 = Tshockwaveflash Komponente)

Delphi-Quellcode:

procedure TF_M3x.Button1Click(Sender: TObject);
begin
  videoname := 'v1.swf';
  video1.movie := ExtractFilePath(ParamStr(0)) + '\videos\' + videoname';
  video1.Play;
end;

Und analog für Button 2 und Video2.

Bisherige Vorschläge haben leider keine Lösung gebracht,
deshalb bin ich auf die Idee verfallen, das Ganze mit
video1.free, video1.destroy zu beenden, was immer zu einer
EAccessViolation führt. (Ein video1.close gibt es leider nicht)

Kann mir dabei jemand weiterhelfen, bzw. hat jemand eine Idee,
warum das zweite Video nicht abspielt, obwohl der String videoname
korrekt übergeben wird?

Vielen Dank schon mal für eure Hilfe,

Litotes