(07-03-2019, Saat: 10:35)yhackup Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.(07-03-2019, Saat: 09:09)forumcuali Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.@cinarbil arkadaş ile birlikte yaptığımız buna benzer bi mssql yedekleme programı var onun kodlarını verelim Bunun kadar afilli olmasadaözellik açısında hemen hemen aynı... yani iş görür geliştirmeye açık
Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.
@ercanskose arkadaşımı da tebrik ediyorum. Ellerine sağlık güzel olmuş...
Gözüme çarptı sadece,
Ekrandaki tüm editleri boşaltmak veya butonları aktif pasif yapmak için tek tek yazmanıza gerek yok , yarn yeni edit eklediğinizde yeni bir satır daha eklemek zorunda kalacaksınız.
Bunun yerine formtaki komponetler arasında for ile dönerek tüm editleri temizle diye bilirsin
Tüm Editleri temizlemek,
var i: Integer; begin for i := 0 to ComponentCount - 1 do if (Components[i] is TEdit) then TEdit(Components[i]).Clear; end;
Tüm butonları pasif hale getirmek
var i: Integer; begin for i := 0 to ComponentCount - 1 do if (Components[i] is TButton) then TButton(Components[i]).Enabled := False; end;
güzel taktik
