Pasword في delphi

[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;