Delphi 5'te bir kullanıcı girişi formu yapıyorum bir acces veri tabanına adoqueryve adoconnection ile bağlanıyorum. Kullanıcı adını yazıp tamama basınca kabul ediyor.(şuan sadece kullanıcı adını yaptım. Şifreyi yapmadım) Kabul etmesine ediyor ama sadece ilk kayıtta oluyor bu ikinci kayıtın adını yazdığımda şifre veya kullanıcı adı yanlış diyor. sorun nedir bulamadım.
adoquery sql'ü
select * from tablo1 WHERE ADOQuery1Kullancad =(Edit1.Text)
Tamam tuşu:
procedure TForm1.Button1Click(Sender: TObject); begin
ADOQuery1.Open; if ADOQuery1Kullancad.text=edit1.text then begin edit1.text:=''; edit2.text:=''; edit1.SetFocus; form2.Show; end else Application.MessageBox('Kullanıcı Adı yada Şifre Yanlış....','UYARI',MB_OK); edit1.text:=''; edit2.text:=''; Edit1.SetFocus; exit; end.
yeni mesaja git
Yeni mesajları sizin için sürekli kontrol ediyoruz, bir mesaj yazılırsa otomatik yükleyeceğiz.Bir Daha Gösterme