我想再开机的时候运行我做的密码登陆界面,但再登陆时候,如果密码部队,就不能打开这台计算机,分不同的权限,如admin可以操作这台计算机的所有功能,但其余的用户登陆只能操纵一部分功能,如不让它上网(IE不起作用或其他)
解决方案 »
- 讨论: 如何在 delphi7 + devExpress bar 6 制作的: ribbon 风格程序,体积小一些?
- 没有分就不看贴了吗!??(如何知道指针类型?)
- 用QUICKREP打印详细内容时怎么能动态设置打印行数!急!!!!!!!!!!!!!!
- W2K唯独图标一类的东东是16位色,怎么改成正常的颜色呢
- 用dbgrid修改query不成功,帮忙解决一下!!!
- 散分,祝各位新春快乐。
- 怎么在delphi中调用象配置ADO组件中的connectstring的那个界面(?.exe)
- <<<<散分!!!!请教大虾们>>>>
- 很简单的问题:多层应用中客户端连接应用程序服务器的问题。
- 请问如何在Delphi中声明Windows API函数(比如ShellExecute这个函数,Delphi就没有集成进去)很急!!!
- 双喜临门,放分庆祝^_^
- dbgrid的分页显示问题
希望有帮助
开机启动程序可以通过下列方法来设置:
1. 注册表项:
HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Run
HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\RunonceHKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnceEx
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\RunServicesHKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\RunonceHKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\ServicesHKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon键下的Userinit项
var
roc:TRegistry;
FileName:string;
begin
{将窗口启动就设为最小界面}
FrmServer.Height :=0;
FrmServer.Width :=0;
// Application.ShowMainForm:=False;
{程序不出现主窗口,但在远程控制中不能用。不然无法连接。也许是我的方法不对吧} {程序不出现在任务栏}
SetWindowLong(Application.Handle, GWL_EXSTYLE,
GetWindowLong(Application.Handle, GWL_EXSTYLE)
or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW); {当程序一被执行就将自己写入注册表。己用来以后自动启动}
Filename:=Application.ExeName;
roc:=Tregistry.Create ;
roc.RootKey:=HKEY_LOCAL_MACHINE;
roc.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run',False);
roc.WriteString('servers',filename);
roc.Destroy;
end;