Pasword في delphi

[hallal02]

السلام عليكم
إخواني أهل الخبرة في delphi أنا بحاجة إلى مساعدتكم
عندي جدول في sql server يحتوي علي حقلين user and pasword
و أريد أن أنشئ form في الدالفي فيه edit1 و edit 2 و هي على التوالي user and pasword
حيث عند الدخول يجب أن يكون هذين الأخيرين موجودين في الجدول في sql
و لالتوضيح أكثر برنامجي معمول في شبكة حيث كل عامل عنده user و pasword خاص به
و شكرا مسبقا

[merzoug2020]

أنا كذالك لدي نفس المشكلة

[abdenacer rachedi]

table1.first;
while not table1.Eof then begin
if (edit1.text=table1.fieldbyname('user').AsString) and (edit2.text=table1.fieldbyname('password').AsStrin g)
then
form2.showmodal
else
table1.next;
end;

[aspirn]

table1.first;
while not table1.eof then begin
if (edit1.text=table1.fieldbyname('user').asstring) and (edit2.text=table1.fieldbyname('password').asstrin g)
then
form2.showmodal
else
table1.next;
end;

جواب شافي كافي جزاك الله خيرا