老总要求我在实习期完成以上功能，还剩五天了，请各位大哥帮帮忙，想想，谢谢！！！

[shanxia]

（1）：如何选定打印机：
我在Combobox中加入了系统内连接到的多个打印机，请问我用什么语句能在 打印模块中使用我在combobox中选定的打印机，请提供详细代码！
（2）：如何实现系统加密功能：
我做了一个系统，老总要求给系统加密，即：当数据库中的“销售单位中文名称”和“注册密码”为空时，系统开始进入注册信息界面，输入和验证后才进入登陆口令界面，当数据库中的销售单位中文名称”和“注册密码”不为空时，直接进入登陆口令界面
（3）向数据库输入一个“销售单位中文名称”如何随机得到一个不限个数的注册密码


老总要求我在实习期完成以上功能，还剩五天了，请各位大哥帮帮忙，想想，谢谢！！！

[wei__wang]

Application的主界面仍然是原先的，两个窗口用showmodal()调用就行了。

现在的老板真黑，在你的代码里，少写些注释，
其实，看一个人的水平到底怎样，完全可以通过工作过程看到，不一定要有结果才算数的。

[shanxia]

谢谢大家,谢谢Nizvoo(瓦匠泥 钟松风 100%投入中) ，我的邮箱是：[e-mail]

[xiachedan]

加油呀！！！

[dbpower]

combobox.text

[shuixin13]

加油吧，

[wyj1974]

1、使用api,到msdn查一下，或到vc版问。
2、应该很好实现，自己做个判断不就行了吗？
3、使用随机数

[s_cube]

uses printers；

printer.getprinter(...);

[telepan]

1.
ComboBox1.Items.Assign(Printer.Printers);

//在选择后，打印前先对PrinterIndex赋值
Printer.PrinterIndex := ComboBox1.ItemIndex;

[longlongge]

up

[longlongge]

formcreate中写：
combobox1.items.assign(printer.printers);
//显示所有打印机
combobox1.itemindex:=printer.printerindex;
//选择默认打印机
combobox1change中写:
begin
with printer do
begin
printerindex:=combobox1.itemindex;
...

[zzzai]

ok

[shadow7880]

1: 楼上的老兄已经解答
2：做两个登陆界面，一个是注册界面，一个是帐号登陆界面
然后在主Form的Create事件先创建上面两个界面，逐一判断

3：随机数直接用Random（10）函数

[shanxia]

to:shandow7880()兄：
请问第二问能详细点吗？我试过好多方法，可是Application的主界面确定了好象就不能改了

[Nizvoo]

Application.Initialize;
Application.Title := 'XXXXX仓库管理系统';;

LogonInf := TLogonInf.Create; //封装了登陆信息
if not LogonInf.DBTryConnection then //数据库连接不成功
begin
LogonInf.Free;
Exit;
end;
//成功了出现登陆窗口
with TfrmLogon.Create(nil) do
try
ShowModal;
finally
Free;
end;
//根据密码用户名决定是否正确。继续做下面的，创主界面了~

if LogonInf.Logoned then
begin
Application.CreateForm(TfrmMain, frmMain);
Application.Run;
end;

LogonInf.Free;

[Nizvoo]

[e-mail]
发个信来，我把程序发给你吧~