Jer moze neko da mi "prevede" ovaj kod u c++
procedure TForm2.Button1Click(Sender: TObject);
begin
{ if Form1.ADOTable2.Locate('Username;Password', VarArrayOf([edit1.Text , edit2.Text]),[])
then begin
edit1.Text:='';
edit2.Text:='';
Edit1.SetFocus;
form1.Showmodal
end
else begin
Showmessage('Please enter correct username and password');
edit1.SetFocus;
end;}
if form1.ADOTable2.locate('Username',edit1.Text,[]) then
if form1.ADOTable2.FieldByName('Password').AsString =edit2.Text then
begin
edit1.Text:='';
edit2.Text:='';
Edit1.SetFocus;
form1.Showmodal
end
else
begin
showmessage('Wrong password');
edit2.SetFocus;
end else begin
showmessage('Username not found');
edit1.SetFocus;
end;
end;