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

Delphi Kod Arşivi

Konusu 'Delphi İle Başlangıç' forumundadır ve YoRuMSuZ tarafından 18 Eylül 2009 başlatılmıştır.

  1. YoRuMSuZ
    Avare

    YoRuMSuZ Biz işimize bakalım!

    Katılım:
    7 Haziran 2006
    Mesajlar:
    24.439
    Beğenileri:
    7.366
    Ödül Puanları:
    11.330
    Cinsiyet:
    Bay
    Banka:
    8.922 ÇTL
    Bu bölümde sık kullanılan küçük kod örnekleri verilecektir. Verilen kodları projelerinizde rahatlıkla kullanabilirsiniz.

    [​IMG]

    Programı (exe) Dosyasını kapatıp tekrar açmak için kullanabileceğini güzel bir kod. Görevi bir butona atayabilirsiniz.

    Kod:
      Kodları görebilmek için ÜYE omalısınız !
     
  2. YoRuMSuZ
    Avare

    YoRuMSuZ Biz işimize bakalım!

    Katılım:
    7 Haziran 2006
    Mesajlar:
    24.439
    Beğenileri:
    7.366
    Ödül Puanları:
    11.330
    Cinsiyet:
    Bay
    Banka:
    8.922 ÇTL
    Delphi içerisinden veritabanı olarak kullandığınız msaccess dosyalarını sıkıştırmaya ve onarmaya yarayan kod.

    Bu koda bazı eklemeler yaparak şifreli msaccess dosyalarınıda sıkıştırıp onarabilirsiniz. Bununla ilgili bir örnek [Linkleri görebilmek için ÜYE olmalısınız!..] bölümünde mevcut.

    Kod:
      Kodları görebilmek için ÜYE omalısınız !
     
  3. YoRuMSuZ
    Avare

    YoRuMSuZ Biz işimize bakalım!

    Katılım:
    7 Haziran 2006
    Mesajlar:
    24.439
    Beğenileri:
    7.366
    Ödül Puanları:
    11.330
    Cinsiyet:
    Bay
    Banka:
    8.922 ÇTL
    Ad - Soyad ayırmak. Veya kelimeleri birbirinden ayırmak için kullanabileceğiniz kod örneği:

    Kod:
      Kodları görebilmek için ÜYE omalısınız !
     
  4. YoRuMSuZ
    Avare

    YoRuMSuZ Biz işimize bakalım!

    Katılım:
    7 Haziran 2006
    Mesajlar:
    24.439
    Beğenileri:
    7.366
    Ödül Puanları:
    11.330
    Cinsiyet:
    Bay
    Banka:
    8.922 ÇTL
    Query ile bir kaydın daha önceden girilip girilmediğini kontrol etme:

    Kod:
      Kodları görebilmek için ÜYE omalısınız !
     
  5. YoRuMSuZ
    Avare

    YoRuMSuZ Biz işimize bakalım!

    Katılım:
    7 Haziran 2006
    Mesajlar:
    24.439
    Beğenileri:
    7.366
    Ödül Puanları:
    11.330
    Cinsiyet:
    Bay
    Banka:
    8.922 ÇTL
    Eğer bir tablo üzerinde değişiklik yapıldığında kaydet butonuna basmayı unutursanız yaptığınız değişikliğin kaydedilip kaydedilmeyeceğini bu kodla kontrol edebilirsiniz.

    Kod:
      Kodları görebilmek için ÜYE omalısınız !
     
  6. YoRuMSuZ
    Avare

    YoRuMSuZ Biz işimize bakalım!

    Katılım:
    7 Haziran 2006
    Mesajlar:
    24.439
    Beğenileri:
    7.366
    Ödül Puanları:
    11.330
    Cinsiyet:
    Bay
    Banka:
    8.922 ÇTL
    DBGrid için fare tekelereği kontrolü.

    Delphi içindeki standat DBGrid fare tekerleğine duyarlı değil. Ancak siz bunu küçük bir kodla halledebilirsiniz. Bunun için form üzerine ApplicationEvents bileşeni ekleyip Message yordamına alttaki kodu yazabilirsiniz.

    Kod:
      Kodları görebilmek için ÜYE omalısınız !
     
  7. YoRuMSuZ
    Avare

    YoRuMSuZ Biz işimize bakalım!

    Katılım:
    7 Haziran 2006
    Mesajlar:
    24.439
    Beğenileri:
    7.366
    Ödül Puanları:
    11.330
    Cinsiyet:
    Bay
    Banka:
    8.922 ÇTL
    Form Başlığını Gizleme

    Formun varsayılan başlığını gizleyerek kendinize özel başlık çubuğu oluşurabilir veya duruma göre başlık çubuğu olmadan kullanabilirsiniz. Kod:

    Kod:
      Kodları görebilmek için ÜYE omalısınız !
     
  8. YoRuMSuZ
    Avare

    YoRuMSuZ Biz işimize bakalım!

    Katılım:
    7 Haziran 2006
    Mesajlar:
    24.439
    Beğenileri:
    7.366
    Ödül Puanları:
    11.330
    Cinsiyet:
    Bay
    Banka:
    8.922 ÇTL
    Yanıp Sönen Label

    Forma bir adet Timer bileşeni yerleştirin.

    Kod:
      Kodları görebilmek için ÜYE omalısınız !
     
  9. YoRuMSuZ
    Avare

    YoRuMSuZ Biz işimize bakalım!

    Katılım:
    7 Haziran 2006
    Mesajlar:
    24.439
    Beğenileri:
    7.366
    Ödül Puanları:
    11.330
    Cinsiyet:
    Bay
    Banka:
    8.922 ÇTL
    Edit bileşenine sadece rakam girilsin.

    OnKeyPress yordamına alttaki kodu yazın.
    Kod:
      Kodları görebilmek için ÜYE omalısınız !
     
  10. YoRuMSuZ
    Avare

    YoRuMSuZ Biz işimize bakalım!

    Katılım:
    7 Haziran 2006
    Mesajlar:
    24.439
    Beğenileri:
    7.366
    Ödül Puanları:
    11.330
    Cinsiyet:
    Bay
    Banka:
    8.922 ÇTL
    Edit veya DBEdit bileşenlerine sadece büyük harf girmek.

    OnKeyPress yordamına alttaki kodu yazın.
    Kod:
      Kodları görebilmek için ÜYE omalısınız !
    Daha sonra hangi Editlerde kullanmak istiyorsanız seçili hale getirip onKeyPress özelliği girdiğiniz edite referans verebilirsiniz.
     

Sayfayı Paylaş