delphi写一个登陆界面提示出现下面错误

procedure TForm2.Button1Click(Sender: TObject);var recordcount:integer;beginADOQuery1.close;ADOQuery1.sql.clear;ADOQuery1.sql.add( ✀select * from login where username= ✀ ✀ ✀+edit1.text+ ✀ ✀ ✀ and password= ✀ ✀ ✀ +edit2.text+ ✀ ✀ ✀ ✀);//这一行出现四个地方提示错误：[Error] Unit2.pas(40): Missing operator or semicolonADOQuery1.open;if ADOQuery1.recordcount=0 thenbeginshowmessage( ✀输入的用户名或密码不正确！ ✀);endelsebegin form1.show; self.hide;end;end;还一个错误[Fatal Error] Project1.dpr(6): Could not compile used unit ✀Unit2.pas✀

2026年09月28日 05:53

有3个网友回答

网友（1）：

);//这一行出现四个地方提示错误：[Error] Unit2.pas(40): Missing operator or semicolo
这个错误是你的'''之间有空格

网友（2）：

试着使用 sql语句中的参数形式访问一下吧
sql.add( 'select * from a where t=:dd ');
TADOQuery.parameters.parambyname('dd').value :=edit1.text;
试试这种方式

网友（3）：

' ' '+edit1.text+ ' ' ' 这个是变量，SQL语句中，字段赋值要单引号的吧比如 where username=‘admin’ ，楼主朝着这个方向想想去试试，希望可以帮到你。