摘要:
procedure AutoRunOnSystemStart(Title, FileName: String);const _Software_Microsoft_Windows_CurrentVersion_Run_ : string = '\Software\Microsoft\Windows\... 阅读全文
摘要:
uses Winapi.Windows;WinExec(PAnsiChar(Application.ExeName), sw_normal); // PAnsiChar : string to PAnsiChar 启动外部的exe 阅读全文
摘要:
我想实现的功能是创建一个服务程序,然后在服务Start时动态创建一个窗体Form,然后把Form缩小时变成TrayIcon放在Windows托盘上。我在服务程序的OnStart事件中写到 Started := True; writeWorkLog('serve2 start'); /... 阅读全文
摘要:
XE里没有Application.Exename所以用paramstr(0);Str:=ParamStr(0); //自己全路径c:\555\qq.exe,可用于控制台Str:=ExpandFileName(ParamStr(0)); //获取本程序的完整路径 c... 阅读全文