Problem mit 2 FlashVideos auf einer Seite

[litotes]

Hallo,

ich programmiere gerade eine Oberfläche, die Flashmovies beinhaltet.
Problem: Ich will mit einem Button TSHockwave1 aufrufen (Video1)
und mit einem zweiten Button eben das zweite Video (TSHockwave2).

Das Abspielen klappt auch mit:

Delphi-Quellcode:

procedure TF_Drucken_1_Vorbedingungen.Button1Click(Sender: TObject);
begin
  Shockwaveflash1.movie := ExtractFilePath(Application.ExeName) + '/videos/' + videoname;
  ShockwaveFlash1.play;
end;

wobei "videoname" übergeben wird von meinem ersten Button:

Delphi-Quellcode:

procedure TF_Drucken_1_Vorbedingungen.R_Memo3x1sp21Click(Sender: TObject);
begin
   videoname := '2.swf';
end;

Aber, obwohl der Name des zweiten Videos übergeben wird, wird es nie abgespielt!
Leider spielt auf Drücken des "Play"-Buttons immer das erste Video ab, bzw. es spielt weiter.

Ich kriegs einfach nicht hin !

Obwohl ich das ganze innerhalb von Frames mache, hat das wohl nichts damit zu tun, oder?
(Button1 und 2 sind ein Frame, Video und play button ein anderes)

Wie krieg ich den Shockwaveplayer dazu, das zweite Video einzulesen??

Für Hilfe wäre ich sehr dankbar!

litotes