procedure TForm1.Button1Click(Sender: TObject);
begin
if edit1.text='chinaxjh' and edit2.text='chinaljx' then
begin
Showmessage('输对了!');
end else
Showmessage('用户名或密码不对!');
end;end.这有为什么不对呀?
begin
if edit1.text='chinaxjh' and edit2.text='chinaljx' then
begin
Showmessage('输对了!');
end else
Showmessage('用户名或密码不对!');
end;end.这有为什么不对呀?
解决方案 »
- 请教IdHttp如何设置cookies信息?
- listview
- 那位帮解释一下TConversion类有什么用处(在线)?
- RichEdit 的行号
- 如何用delphi 6调用水晶报表9的报表
- dephi 中ado控件执行如何得到sql错误信息!
- 怎么清除ClientDataSet的日志?
- 我想在delphi程序中调用Oracle的存储过程,但为什么系统老是编译不过去呢?
- delphi中数据模块怎么制作?我参照的一个程序它把所有的数据组件,控件都放在DM上了.我很是好奇.想知道它究竟是在解决一个怎样的问题.
- 大家好,有谁用delphi做过opc server 程序
- 根据首次输入的编码规则自动生成编码的问题!!~~~~~~顶者有分
- 初学,一个简单问题~谢谢
就对了