الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

تسجيل الدخول والانتقال لفورم اخر

بدأه elhedjadj في 23 مارس 2009 · 2 رد · 796 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

اريد مساعدة في كيفية عمل تسجيل دخول في الدلفي لفورم من خلال معلومات في قاعدة البيانات

متلا لدي form1

فيها مكانين للمستخدم وكلمة المرور وحين ادخال معلومات صحيحة موجودة في قاعدة البيانات يتم الانتقال الى form2

ارجو المساعدة في دلك وشكرا

#2

السلام عليكــم ورحمـة الله وبركاتــه ،،

  1.   if ADOTable1.Locate('User',Edit1.Text,[locaseinsensitive]) then
  2.     begin
  3.     if ADOTable1.FieldByName('Password').AsString=Edit2.Text then
  4.                 begin
  5.                 LoginForm.Visible := false;
  6.                 MainForm.Visible := True;
  7.  END
  8.  else
  9. showmessage ('Sorry! Wrong Password');
  10.  END
  11.  else
  12. showmessage ('sorry! No User Found');
  13.  

بالتوفيق

      
      

      
Comming Soon

    

  

    
    

      
#3
        
        

      
شكرا جزيلا اخي swift

      
      

      
    

  

    
    
    
 مواضيع مشابهة





  

    
عدد الزوار حالياً
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

    
—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

    
جارٍ التحقق من المتواجدين…