求 一个登录界面代码
刚学delphi，想做个简单的登陆界面，但我代码不太会写。。。
我在sql建了个员工登录表(数据库名也是用工考勤系统)，属性列是：adminName ,adminpassword
(id,name)为(001,001)或(002，002)，我登陆界面有三个按钮：确定，取消。按确定后进入主界面。
代码怎么写啊，请大家帮帮忙!
[解决办法]
这个还是自己动手比较好，就是在点击确定后从数据库中查询用户名密码，你以后总不能啥东西都让人家给你做好的
[解决办法]
在工程文件中创建密码校验窗体，判断密码，通过的话继续创建主窗体运行程序，不通过关闭程序。
代码要自己写最好，不然怎么也不能得到提高吧。
