arkadaşlar merhaba delphide yeniyim ve kendimce bir proje geliştiriyorum yardımlarınızı bekliyorum
sorunum şu veritabanında bir kullanıcı adı ve şifresi belirliyorum. programa girmek isteyen kullanıcı doğru kullanıcı adını ve şifresini girmediği zaman hatalı kullanıcı veya şifresi diye bir mesaj vermesi
teşekkürler
kullanıcı adı ve şifre kontrolü
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
selam
Hocam bu konuda aşırı bir bilgi var forumda arattırman iyi olacaktır ama benim kendi kullandığım bir şeyi verim seni.
Kod: Tümünü seç
with dm2.passquery1 do
begin
close;
sql.clear;
sql.add('select TIPI from PASSDURUM where KULLANICI_ADI=:KULLANICI_ADI and SIFRE=:SIFRE') ;
Params[0].Asstring:=Edit1.TExt; //Login Ekranındaki Kullancı Adı girişinde kullanacağın edit
Params[1].Asstring:=Edit2.text; //Login Ekranındaki Şifre girişinde kullanacağın edit
Active:=true;
if isempty then ShowMessage('Hatalı Şifre/KullancıADI') else
begin
if Fields[0].Asinteger=0 then anamenu.showmodal else
if Fields[0].Asinteger=1 then
anamenu.show;
anamenu.BitBtn4.Enabled:=false;
password1.Hide;
-
- Üye
- Mesajlar: 30
- Kayıt: 19 Tem 2004 09:25
-
- Üye
- Mesajlar: 30
- Kayıt: 19 Tem 2004 09:25
-
- Üye
- Mesajlar: 30
- Kayıt: 19 Tem 2004 09:25