1。注册表
2。启动列表
3。修改win.ini
2。启动列表
3。修改win.ini
解决方案 »
- 向各位大侠求一个树形操作界面的数据库通用查询控件
- 关于钩子的问题,有超级高分送
- 怎样才能从SQL2000 发送消息到DELPHI,着急!!~
- Ado组件不见了,怎么办?
- 如何才能做到预览的时候用户可调整打印页面?
- 怎么把label的值显示为20,000.00
- 能不能在Delphi中用TWebBrowser控件保存网页(包括图片),不用弹出保存对话框这么麻烦?
- 路径中含有双反斜线'\\'是什么意思
- 如何把CheckListBox中选定的项目取出来?
- 请教如何在DELPHI5中连接EXCEL表格?
- 《Delphi开发人员指南》在北京哪个书店卖的最便宜?
- 谁精通DELPHI和VC++。。。。。。。。。。
1)我公司有个人把自已的程序替换了runonce.dll。同理,你可以替换掉其它类似的Windows文件(参考各种木马病毒)
2)计划任务。
3)ActiveDestop桌面(参考“欢乐时光”病毒)TO duanfeng(段)
启动列表:见到开始菜单上的启动没有?
//sCmdLine : program,always its extention is EXE
//bRunOnce :True --> if you want to run your program just once.
// False --> specified program will be executed every time Windows startsup.
procedure RunOnStartup(
sProgTitle,
sCmdLine : string;
bRunOnce : boolean );
var
sKey : string;
reg : TRegIniFile;
begin
if( bRunOnce )then //Run at Once!
sKey := 'Once'
else
sKey := ''; reg := TRegIniFile.Create( '' );
reg.RootKey := HKEY_LOCAL_MACHINE;
reg.WriteString('Software\Microsoft'+ '\Windows\CurrentVersion\Run' + sKey + #0,
sProgTitle,
sCmdLine );
reg.Free;
end;Example:
RunOnStartup(
'Title of my program',
'GoStock.exe',
False );