MSSQL Yedekleme Programı

[yhackup]

(07-03-2019, Saat: 09:09)forumcuali Adlı Kullanıcıdan Alıntı:

(18-02-2019, Saat: 00:29)delphi-x Adlı Kullanıcıdan Alıntı: Kaynak kodlarını da paylaşsan da dua etsek

@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

https://github.com/forumcuali/sql-backup


@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;