Modüllerde Kullanıcı Hakkı verme.

[ozcank]

Arkadaşlar Merhaba; Sağlıklı Günleriniz Olsun.

Yazmış olduğum uygulamada ki modüllere kullanıcı hakkı şeklinde bir işlem yapmak istiyorum yardımcı olursanız sevinirim.

Kurulum esnasın damı daha doğru olur yoksa program içerisinden mi?

Şöyle;
Button1 "Stok Bakiye Raporu" alabilsin ama
Button2 "Stok Hareket Raporu" hakkı olmadığı için soluk kalacak.

bu şekilde nasıl yapabilirim?

Delphi7 kullanıyorum.

[Commandx]

Veritabanınızda bir tablo daha açıp kullanıcı yetkileri verebilmek için kullanıcı adı(USER) ve şifresi(PASSWORD) alanları yanında birde o kullanıcının erişim yetkileri olarak stok_bakiye_raporu , Stok_hareket_raporu vs. .... gibi alanlar daha ekleyerek ve bunları bir tabloya veya datasete bağlayıp
oluşturduğunuz form üzerinde dbcheckbox lara bağlayıp bir timer veya dbchceckbox1.... ları da veritabanın içindeki oluşturduğunuz (stok_bakiye_raporu , Stok_hareket_raporu) alanlardan checkboxun durumunu (true mi false mi yani seçilimi değilmi) durumuna göre butonları enabled = true false yapabilirsiniz DBcheckboxların true veya false olmasına bağlı olarak buton aktifleşir yada pasifleşir

Kod: Tümünü seç

if dbcheckbox1.checked=true then begin
Button1.enabled:=true;
//-- buraya başka kodlar daha yazılabileceğini göz önünde bulundurarak
end;
if dbcheckbox1.checked<>true then begin
Button1.enabled:=false;
//-- buraya başka kodlar daha yazılabileceğini göz önünde bulundurarak
end;

if dbcheckbox2.checked=true then begin
Button2.enabled:=true;
//-- buraya başka kodlar daha yazılabileceğini göz önünde bulundurarak
end;
if dbcheckbox2.checked<>true then begin
Button2.enabled:=false;
//-- buraya başka kodlar daha yazılabileceğini göz önünde bulundurarak
end;

bunlar program içinden olabilecek şeyler.