关于追加登陆页面的问题!在线等~解决就给分 小弟刚学DELPHI新做一个小系统,做完之后想追加用户登陆页面,但隐藏主页面显示用户登陆页面时,程序不能运行~~~请问各位大侠帮忙解答。。本人急用在线等 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 加入一个新form作为登陆页面窗体,然后修改dpr文件,可参考如下:program Project1;uses Forms, windows, SysUtils, Controls, Unit1 in 'Unit1.pas' {Form1}, Unit2 in 'Unit2.pas' {Form2};{$R *.res}begin Application.Initialize; Form1 := TForm1.Create(Nil); //登陆窗体 if Form1.ShowModal <> mrOK then //身份验证过程在登陆窗体中完成,如不成功则程序终止 Application.Terminate; Application.CreateForm(Tform2,form2);//原来的主form生成 Application.Run;end. 在program单元里面控制学习 请问能否通过远程SOCKET通讯调用本机DLL Delphi 急:如何限制下拉列表框粘贴功能? 请问 一个 indy Smtp 发邮件问题。 主题长度太长时, 出现收到的邮件不正常,如何解决呢? 李维的 MTS/COM+ 后面几章那里有下载啊? 讨教!我从网上下 .dcr, .dcu, .dfm 三个文件,没有.pas文件,请问怎样注册组件? 如贴 简单打印可总报错 delphi三层开发问题. 关于窗体ICON的小问题 ADO连接SQL2005老是掉线 ADOdataset的问题,快快请进 请问有人知道李维的Email或其它联系方式吗??想请教他问题。。。
Forms,
windows,
SysUtils,
Controls,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2};{$R *.res}
begin
Application.Initialize;
Form1 := TForm1.Create(Nil); //登陆窗体 if Form1.ShowModal <> mrOK then //身份验证过程在登陆窗体中完成,如不成功则程序终止
Application.Terminate; Application.CreateForm(Tform2,form2);//原来的主form生成
Application.Run;
end.
学习