是这样的,下面的一段代码,谁可以看看是哪 里的错啊。procedure TForm1.Button1Click(Sender: TObject);var b:string;c:string;beginb:=edit1.Text;c:=edit2.text;//if b='123'and c='123' thenbeginform2.Show;hideendelse//showmessage(你的用户名或密码不正确,请重新输入);end;end.我主要想知道划注释线的那两句的错误出在哪里。具体应该怎么写。谢谢 。别外这里我想用到数据库。请问如果用数据库来做。又将怎么来写代码呢?我这里做的是一个用户的登陆系统。
參考答案:if (b='123')and (c='123') then
showmessage('你的用户名或密码不正确,请重新输入');
数据库的话用ADO或BDE控件就行了