Flash Player

[writeLine]

Delphi 7 için program ile haberleştirebileceğimiz flash player komponenti bilen varmı? (Bedava)

[cS]

http://www.gold-software.com/7116.exe

Böyle bir component var bilmem işinize yarar mı?

Bunu diğer bir yolla WebBrowser componenti ile yapabilirsiniz..
Not: Bu yöntem sistemde Flash Player kurulu ise çalışır..

webbrowser1.navigate := 'swf.swf'

ya da flash player ı sistemine kurduktan sonra
import type library -> Oradaki Listede SWF ActiveX Control diye birşeyler olması gerek onu import edip dclusr ya da yeni bir pakete koyup derle ve kur, o vakit bir flash player componentin olacaktır...

Çok mu karışık oldu acaba?...sen dene dostum olmadı ben yarın bi kod koyayım bir yerlere

[writeLine]

naesse Delphi içinde kullandığımız flash animasyonlar transparan ayarlanabiliyormu? Aynı transparan formlar gibi!!!

[writeLine]

Beyler birde bu flash.ocx ile flash içindeki fonksiyonları çalıştırabilirmiyiz?

[karflake]

Daha önce hiç flashla çalışmadım, o yüzden söylediklerim tamamen beyin jimnastiğidir.

Yanılmıyorsam flash ile text dosyalardan okuma yapılabilliyordu. Delphi tarafında dinamik olarak text dosyası oluşturup, formdaki flash nesnesinin de bu dosyayı okuyup, ona göre işlemler yapmasını sağlayabilirsiniz belki.

valla transparent denemedim daha önce...benim kullanışım hakkında kısmında şekil olsun diye ya da öle prg.nin içinde şekil olsun maksatlı idi...bu sebepten hiç bir fikrim yok...üzgünüm

[hmustak]

delphi dışında flash animler transparent oluyormu?

[writeLine]

İnternet explorerda ufak bir kod değişikliği ile transparan olabiliyor.

Ben delphi içindende transparan yaptım flash ı. Fakat kendi bilgisayarımda değil. Arkadaşa delphi kurmuştum onda oldu bende olmuyor. Bende ServicePack2 kurulu onda değil. Bundan olabileceğini düşündüm.

Flashlı transparan benim programımla haberleşen bir program yaptım. Çokta güzel oldu.
Bunu yapabilmek için biraz flash bilginiz varsa Scriptte kullandığımız fscommand ile programla haberleştirebiliyoruz. Fakat grafikler düz zeminde çok iyi, eğer artalan resmi varsa kenarlarında ufak bozukluklar oluyor.

[MUDERLESS]

Fazla uğraşmayın size swf yi exe ye gömmenin bir yolunu gösterceğim

Exe ye swf gömmek için sırası ile

1. adım : swf mizi c:\ kopyalıyoruz. ( Swf mizin adı Deneme olsun.)

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 ( c:\ ) ve burada copy con Deneme.rc yazıp entera basın. İmleç 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(Application.ExeName)+'\dene me.swf';
rStream := TResourceStream.Create(hInstance, 'deneme', RT_RCDATA);
try
fStream := TFileStream.Create(fname, fmCreate);
try
fStream.CopyFrom(rStream, 0);
finally
fStream.Free;
end;
finally
rStream.Free;
end;
ShockwaveFlash1.Stop;
ShockwaveFlash1.Movie:=fname;
ShockwaveFlash1.play;
end;

tabii {$R *.Dfm} ifadesinin altına {$R deneme.res} 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 ( Combobox ) istediğiniz sekmeyi seçip öyle Install edebilirsiniz...

Hepinize çalışmalarınızda başarılar dilerim.