Tabiki.. Sonuçta gömme işlemi "Exe" uzerinde yapılıyor..

Güzel Karma veriyim bari. Mr.

Exe ye swf gömmek için sırası ile 1. adım : swf mizi c:\ kopyalıyoruz. 2. adım : Başlat tan çalıştıra geliyoruz ve command yazıp enter a basıyoruz. 3. adım : Yine diskimizin root una geliyoruz ve burada copy con Deneme. rc yazıp entera basın. Imleç bir alt satıra geçiyor. Burayada deneme rcdata deneme. swf yazdıktan sonra klavyemizin ctrl + z tuşlarına basarak rc dosyamızı oluşturalım. 4. adım : Tekrar root tayken brcc32 deneme. rc yazarak entera basıyoruz. Delphi komutu otomatik olarak bize. res dosyasını oluşturuyor. 5. adım : Delphiyi açtıktan sonra formun oncreate veya onshow olayına aşağıdaki kodumuzu yapıştırıyoruz. var rStream: TResourceStream; fStream: TFileStream; fname: string; begin fname:=ExtractFilePath +'\deneme. swf'; rStream := TResourceStream. Create ; try fStream := TFileStream. Create ; try fStream. CopyFrom(rStream, 0); finally fStream. Free; end; finally rStream. Free; end; ShockwaveFlash1. Stop; ShockwaveFlash1. Movie:=fname; ShockwaveFlash1. play; end; tabii ifadesinin altına yazmayı ve uses e mmsystem eklemeyide unutmayalım. Buraya kadar Ama bunun için Delphiden activex bileşeni olan ShockwaveFlash kurulmalıdır. Eğer bu delphiye install edilmemiş ise o zaman durmadan adımlara devam. 6. adım : Delphi menüsünden Component --> Import ActiveX Contol... -- > Shockwave Flash (Versiyon 1.0) seçilerek Install tuşuna basılır. Burada şunu belki hatırlatmama gerek yok ama bilmeyenler olabilir diye küçük birşey daha belirtmek istiyorum, Install butonuna basmadan önce isterseniz bu bileşenin kütüphanenin hangi sekmesinde olacağına siz karar verebilirsiniz. Bunun için Palette Page açılır kutusundan istediğiniz sekmeyi seçip öyle Install edebilirsiniz... Mr.666

Abicim şimdi SWF'yi çalıştıran exeyi de çalıştırmış oluyo mu? Mr.

Teşekkür ederim Usta..