房屋租赁管理系统全功能版
一套完成的租赁管理，和作业版不同，这个功能应该够用了。
procedureTFrm_Login.bbtnokClick(Sender:TObject);
begin
//录入检验
ifcbUserId.text=''then
begin
messagedlg('请选择用户名！',mtInformation,[mbok],0);
cbUserId.SetFocus();
exit;
end;
//登录验证
withADOQ_Tempdo
begin
close;
SQL.C
下载地址
用户评论
