运行其他exe程序
加WinProcs单元
str:=ExtractFilePath(Application.ExeName)+'\服装\服装进销存管理系统.exe';(str为变量)
WinExec(pchar(str),sw_normal);
运行其他程序
加shellapi单元
str:='C:\Documents and Settings\Administrator\桌面\KZH\文档\hack.chm';(str为变量)
shellexecute(0,'Open',pchar(str),nil,nil,Sw_Normal);
WinExec('执行文件',显示方式)
显示方式:
SW_HIDE = 0; 隐藏窗口
SW_SHOWNORMAL = 1; 普通模式
SW_SHOWMINIMIZED = 2; 最小化
SW_SHOWMAXIMIZED = 3; 最大化
SW_SHOWNOACTIVATE = 4; 激活窗口