10. ACTIVEX DOKÜMANLARININ KULLANILMASI

10.1. GİRİŞ

Visual Basic UserDocument denilen ve başka nesneleri barındıran bir nesne türü sağlar. Bu nesne Internet Explorer ile görülebilir web VBD uzantılı dökümanlar hazırlama olanağı sağlar.

UserDocument nesnesi tıpkı bir form gibidir. Kontrol nesnelerini içerebilir, mesaj kutuları gösterebilir, verileri işleyebilir ve başka bileşenleri çağırabilir. Formlardan önemli bazı özellikleriyle ayrılır.

10.2. ACTIVEX DOKÜMAN PROJESİ

Bir ActiveX doküman projesi için ilk yapılması gereken bir UserDocument nesnesi çıkarmak ve içine tıpkı normal uygulamalar için yapıldığı gibi kontrol nesneleri koyup bunlara işlev kazandırmaktır.

Şimdi bir ActiveX dokümanı hazırlamayı adımlar halinde gösterelim.

  1. ActiveX Document EXE türünden bir proje yaratın. Proje ismini prjBilgi ve UserDocument nesnesinin ismini Bilgi olarak değiştirin.
  2. Aşağıdaki nesneleri form üzerine ekleyin. Görünümü aşağıda belirtilfiği gibi olsun.


    3. TextBox Text1 (controlarray 0-5)

    CommandButton Command1 “Kaydet”

  3. Yeni bir class modeule ekleyin ve aşağıdaki kodu ekleyin. İsmini clsBilgi yapın.


    4. Public adSoyad As String

    Public dyer As String

    Public Adres As String

    Public semt As String

    Public Sehir As String

    Public pkod As String

  4. Yeni bir module ekleyin ve aşağıdaki kodu ikleyin. İsmini mdlKisi yapın.


    5. Public kisi As New clsBilgi

    10.3. ÇOKLU DOKÜMAN KULLANIMI

  5. Yeni bir User Document ekleyin. Bu doküman girilen bilgilerin onaylanması için kullanılacaktır. İsmini Onay olarak değiştirin. İçine Label nesnelerinden oluşan bir controlarray ve iki tane de CommandButton yerleştirin. Görünümü aşağıdaki gibi olsun.


  6. Projeyi kaydedin.
  7. Bilgi adlı userdocument nesnesine aşağıdaki kodu ekleyin.


    8. Dim Onay As String

    Private Sub Command1_Click()

    kisi.adSoyad = Text1(0)

    kisi.dyer = Text1(1)

    kisi.Adres = Text1(2)

    kisi.semt = Text1(3)

    kisi.Sehir = Text1(4)

    kisi.pkod = Text1(5)

    Onay = "d:\devstudio\vb\onay.vbd"

    Hyperlink.NavigateTo Onay

    End Sub

    Bu kod Kaydet düğmesine basıldığında kisi bilgilerinin alınıp, Onay dokümanının gösterilmesini sağlar.

  8. Onay adlı userdocument nesnesine aşağıdaki kodu ekleyin.

Private Sub Command1_Click()

Dim i As Integer

Open "kisi.txt" For Output As #1

For i = 0 To 5

Print #1, Label1(i).Caption

Next i

Close #1

MsgBox "Bilgiler kisi.txt adli dosyaya kaydedildi"

End Sub

Private Sub Command2_Click()

Hyperlink.GoBack

End Sub

Private Sub UserDocument_Initialize()

Label1(0).Caption = Label1(0).Caption & kisi.adSoyad

Label1(1).Caption = Label1(1).Caption & kisi.dyer

Label1(2).Caption = Label1(2).Caption & kisi.Adres

Label1(3).Caption = Label1(3).Caption & kisi.semt

Label1(4).Caption = Label1(4).Caption & kisi.Sehir

Label1(5).Caption = Label1(5).Caption & kisi.pkod

End Sub

Bu kod Devam butonuna basıldığında bilgileri kisi.txt adlı dosyaya kaydeder. Daha sonra bir mesaj kutusu ile bunu bildirir.

Iptal butonu ise Veri Giriş Formuna geri dönüşü sağlar.

Programın test edilmesi ve varsa hatalarının bulunabilmesi için aşağıdaki aşamaları izleyin.

  1. Projeyi çalışır durumda bırakın.
  2. Internet Explorer programını açın.
  3. File menüsünden open seçeneğini seçerek “d:\devstudio\vb\bilgi.vbd” adlı dosyayı açın. Bu işlem bilgi formunun çıkmasını sağlar.
  4. Bu formun KAYDET düğmesine basıldığında ikinci doküman olan Onay formu çıkar.
  5. Onay formunda Kaydet butonuna basıldığında bir mesaj kutusu ile bilgilerin kaydedildiği belirtilir.
  6. Iptal butonuna basıldığında ise Bilgi formuna geri dönülür.

Bu projede dikkat edilmesi gereken bir nokta UserDocument nesnelerinin ortak olarak kullandığı kisi nesnesinin bir module içinde tanımlanmasıdır.

UserDocument nesnesine kullanıcı arayüzü tanımlamak için kullanılan öğeler yerleştirmek mümkündür.

Örneğin bir UserDocument projesinde başka bir form kullanmak ve bu formun gösterilmesini sağlamak, bir menü eklemek mümkündür.

Ayrıca, UserDocument nesnesine tıpkı diğer nesne tanımlarında olduğu gibi, özellik, metot ve olay eklemek ve eklenen bu öğeleri başka programların kullanmasına olanak vermek de mümkündür.

10.4. KULLANICI ARAYÜZÜ

Bir örnekle UserDocument nesnesine kullanıcı arayüzü eklemeyi gösterelim. Bunun için aşağıdaki aşamaları takip edin.

  1. Project menüsünden Add Form seçeneğini seçin.
  2. Çıkan pencereden About Dialog türünden bir form ekleyin.
  3. Formun üzerindeki etiketleri ileride verilecek olan form görünüşünü referans olarak alıp değiştirin. Formun Form_Load yordamını kaldırın. Projeyi kaydedin.
  4. Bilgi adlı userdocument tasarım penceresini açın.
  5. Tools menüsünden menü editor seçeneğini seçin.
  6. Menü editor penceresinden iki tane menü öğesi ekleyin. Bunlar aşağıdaki özelliklere sahip olsun.


    7. Caption Name   Negotiate Position
    Yardim mnuYardim 3-Right
    Hakkinda mnuHakkinda (none)

  7. Aşağıdaki kodu Bilgi adlı usercontrol nesnesine ekleyin


    8. Private Sub mnuHakkinda_Click()

    frmAbout.Show

    End Sub

  8. Projeyi çalıştırın ve çalışır durumda bırakın.
  9. Internet Explorer programını açın ve File menüsünün Open seçeneğini kullanarak Bilgi.VBD dosyasını açın. Görüldüğü gibi Internet Explorer menülerinde bir değişiklik oldu ve Yardim adlı bir menü oğesi eklendi. Bu menüden Hakkinda seçeneği seçilirse aşağıdaki form görüntüsü belirecektir.

Şimdi ActiveX dokümanı yaratmanın aşamalarını özetleyelim.

  1. Dokümanın ön tasarımı yapılmalı ve nitelikleri belirlenmeli.
  2. Dokümanın görünüşü tasarlanmalıdır.
  3. Dokümanın arayüzü tanımlanmalı, başka uygulamalar tarafından kullanılabilecek özellik, metot ve olayları belirleyip programlamak
  4. Projenin içerebileceği fazladan formları tasarlayıp işlev kazandırmak.
  5. UserDocument nesnesine kod eklemek
  6. Dokümana işlevsellik kazandıracak kodu yazmak.
  7. .vbd dosya oluşturmak için projeyi derlemek ve projeyi test etmek.


 
 

back_sel.gif (1050 bytes)forw_sel.gif (1061 bytes)

Ana Sayfa