1. * 5651 Sayılı Kanun'a göre TÜM ÜYELERİMİZ yaptıkları paylaşımlardan sorumludur.
    * Telif hakkına konu olan eserlerin yasal olmayan şekilde paylaşıldığını ve yasal haklarının çiğnendiğini düşünen hak sahiplerinin İLETİŞİM bölümünden bize ulaşmaları durumunda ilgili şikayet incelenip gereği 1 (bir) hafta içinde gereği yapılacaktır.
    E-posta adresimiz

Bilgisayarım Ne Kadar Süre Açık Kalmış ?

Konusu 'Delphi İle Başlangıç' forumundadır ve YoRuMSuZ tarafından 28 Nisan 2007 başlatılmıştır.

  1. YoRuMSuZ
    Avare

    YoRuMSuZ Biz işimize bakalım!

    Katılım:
    7 Haziran 2006
    Mesajlar:
    24.432
    Beğenileri:
    7.358
    Ödül Puanları:
    11.330
    Cinsiyet:
    Bay
    Banka:
    8.825 ÇTL
    Bu çalışmada bilgisayarımızın ne kadar süre açık kaldığını bulacağız. Örneğin sizden başkası bilgisayarınızı açtı ve size sadece 10 dakikadır açık diyor. Ama artık siz bu basit programınızla gerçeği ortaya çıkaraıyorsunuz :)

    Yeni bir proje başlatıyoruz ve formumuz üzerine

    1 adet Buton
    1 adet Label ekliyoruz.

    Ancak burda yeni bir function tanımlamamız gerekiyor. Hazır function kodlarını buradan alıp direkt kullanabilirsiniz.

    Klavyeden F12 tuşuna basarak kod penceresine ulaşıyoruz. ve

    {$R *.dfm}

    yazan yerin hemen altına alttaki function'u aynen ekliyoruz.
    Kod:
      Kodları görebilmek için ÜYE omalısınız !
    Şimdi yukarıdaki kodu eklediğimize göre tekrar form alanına dönmek için F12 tuşuna basıyoruz. Formumuzdaki Butona çift tıklayıp Butonun OnClick yordamına yazacağımız kod bölümüne ulaşıyoruz ve begin - end blokları arasına aşağıdaki kodu yazıyoruz.
    Kod:
      Kodları görebilmek için ÜYE omalısınız !
    Artık Label'deki yazıyı renklendirmeyi öğrenmiştik. İstediğiniz renge göre ayarlayabilirsiniz. Hatta form sayfasında iken Label'i seçili hale getirip Properties bölümündeki Font ayarlarından istediğiniz şekilde görünümü değiştirebilirsiniz.

    Artık Button üzerinde ne yazmak istiyorsanız yine Properties bölümünden Caption bölümüne yazın. Label'deki yazıyı da ilk açılışta ne görünmesini istiyorsanız aynı bölümden değiştirebilirsiniz. Bizim için önemli olan Butona bastığımızda bilgisayarın açık kalma süresini bize vermesi.

    Kodlar tamam ise artık Run (F9) diyoruz exe dosyamız derleniyor. Butona bastığımızda Label de bilgisayarın açık kalma süresi bize verilecek.

    [​IMG]
     
  2. Girayhan

    Girayhan Uzman

    Katılım:
    12 Şubat 2007
    Mesajlar:
    936
    Beğenileri:
    6
    Ödül Puanları:
    630
    Banka:
    21 ÇTL
    Bilgine sağlık teşekkürler
     
  3. YoRuMSuZ
    Avare

    YoRuMSuZ Biz işimize bakalım!

    Katılım:
    7 Haziran 2006
    Mesajlar:
    24.432
    Beğenileri:
    7.358
    Ödül Puanları:
    11.330
    Cinsiyet:
    Bay
    Banka:
    8.825 ÇTL
    Bu dersin kaynak kodları yukarıda verilmişti. Çalışan exe dosyasının işine yarayabileceğini düşünen kullanıcılarımız bu küçük programı aşağıdaki linkten indirebilirler.

    Yukarda verilen kodları dışında çok küçük değişiklikler verilmiştir. Bunlar, program ikonu, program adı, ilk kullanımda pasif olan Göster butonunun 20 sn sonra aktif olması, açıklama metni. (Programda süreye bağlı değişiklik olması ile ilgili ayrıca bir ders yayınlacak)

    Boyut: 178 KB

    [Linkleri görebilmek için ÜYE olmalısınız!..]

    [​IMG]
     
  4. yolcu

    yolcu Üyecik

    Katılım:
    20 Şubat 2007
    Mesajlar:
    4
    Beğenileri:
    0
    Ödül Puanları:
    20
    Banka:
    0 ÇTL
    Saol Ellrİne SaĞlik Prgoram Çok GÜzel ÇasliŞiyor
     
  5. biz

    biz Aktif

    Katılım:
    12 Şubat 2007
    Mesajlar:
    324
    Beğenileri:
    3
    Ödül Puanları:
    630
    Banka:
    0 ÇTL
    buda güzel
     

Sayfayı Paylaş