1. Ana Sayfa
  2. Bilgisayar
  3. Delphi ile flash kullanımı

Delphi ile flash kullanımı

Son güncelleme: 03.03.2006 21:06
D_tox D_tox foto
  • İlk Önce Flash Component'inin Delphi'ye Eklenmesi Gerekir.
    1-Component Menüsü Açılır.
    2-Import ActiveX Control Seçeneği Seçilir.
    3-Açılan Pencerede Shockwave Flash Seçeneği Seçilir.
    4-Install Tuşuna Tıklanır.

    Flash'ı Delphi İçerisinden Kullanabilmek İçin. Flash Animasyonundan Yönlendirmeler Yapılması Gerekir. Örneğin Flash Üzerinde Hazırlanan Bir Butonun, Delphi Formu Üzerinde Tıklandığını Anlayabilmesi İçin;

    1-Flash'dayken Hazırlanan Tuşun Action Kısmında fscommand Komutunun Kullanılması Gerekir. fscommand Komutu Flash'ın Diğer Programlarla Bağlantı Kurmasını Sağlamak İçin Kullanılır. Örnek : fscommand("Kaydet","");
    Bu Şekilde Bir Komut Kullanıldığı Zaman.Delphi'de Kullanılan OCX İçerisinden fscommand'ın Gönderdiği "Kaydet" Değeri Alınabilir. Button Flash'da "Button.fla" İsmi İle Kaydedildikten Sonra Swf Olarak Derlenir. Delphi Programı Açılır.

    2-Yukarıdaki ActiveX Bölümünden Shockwaveflash Nesnesi Eklenir. Nesnenin Movie kısmına "Buton.Swf" Dosyasının Yolu Ve Adı Belirtilir. Daha Sonra Onfscommand Kısmından Command Değerinin Kontrolü Yapılarak Tuşa Basılıp Basılmadığı Anlaşılır.

    Örnek:

    procedure TForm1.FormCreate(Sender: TObject);
    begin
    shockwaveflash1.Movie:='Button.Swf';
    end;

    procedure TForm1.ShockwaveFlash1FSCommand(Sender: TObject; const command,
    args: WideString);
    begin
    if Command='Kaydet' then
    Showmessage('Kaydet Tuşuna Basıldı');
    end;
#03.03.2006 21:06 0 0 0