29-03-2013, 09:31 AM
29-03-2013, 11:56 AM
hاضف مكون اكتيفاكس بالدهاب الى
componet---->import activex contril----->shock wave flash
ثم اضفه الى قائمة المكونات وضعه في الفورم واختر الفلم movie في خصائص المكون وضع رابط الملف الفلاشي بكتابة مساره هناك
والسلام عليكم
componet---->import activex contril----->shock wave flash
ثم اضفه الى قائمة المكونات وضعه في الفورم واختر الفلم movie في خصائص المكون وضع رابط الملف الفلاشي بكتابة مساره هناك
والسلام عليكم
29-03-2013, 04:58 PM
هنا كود ربما ينفعك
PHP كود :
procedure TmDemo.FormCreate(Sender: TObject);
begin
FlashPlayer.Movie := ExtractFilePath(Application.ExeName) + 'sample.swf';
labelInfo.Caption := Format('%d frames', FlashPlayer.TotalFrames);
FlashPlayer.Play;
end;
procedure TmDemo.bStopClick(Sender: TObject);
begin
FlashPlayer.Stop;
end;
procedure TmDemo.bPlayClick(Sender: TObject);
begin
FlashPlayer.Play;
end;
