很基础的问题

Question

1.如何获取程序自身的参数,比如 abc.exe 123.txt
,如何获取参数"123.txt"?2.如何运行外部程序(包括文挡,如doc,htm,由相应的程序自动打开)?

Answer 1

ParamStr(Index:integer):String  第N个参数内容
  ParamCount 参数个数ShellExecute(0,'open',PChar(‘文件名称’),nil,nil,SW_SHOWNORMAL)

Answer 2

1。ParamStr(Index:integer):String  第N个参数内容
  ParamCount 参数个数
  和楼上一样
2。ShellExecute(0,'open',PChar(‘文件名称’),nil,nil,SW_SHOWNORMAL)，例如调用计算器
    S:string;    
    SetLength(s,30);
    if GetWindowsDirectory(pchar(S),30) =0 then
        begin
        Application.MessageBox('获取WINDOWS路径时出现错误。','提示信息', MB_OK Or MB_ICONINFORMATION);
        exit;
        end;
    SetLength(S,StrLen(PChar(S)));
    S:=s+'\calc.exe';
    ShellExecute(form1.handle,'open',pchar(s),nil,nil,SW_SHOWNORMAL);

Answer 3

application就是程序自身。它有许多属性。
ShellExecute(form1.handle,'open',pchar(s),nil,nil,SW_SHOWNORMAL);

Answer 4

运行外部程序
一：
WinExec('C:\WINDOWS\NOTEPAD.EXE',SW_Maximize);
二：
ShellExecute(handle,'open','test.txt','','',SW_ShowNormal);
   {第一个参数为夫窗体句柄
    第二个参数为打开方式（open和print两种）
    第三个为执行文件全路径 
    第四个为执行文件参数
    第五个为执行文件开始运行时的初始目录
    第六个为执行文件运行方式(SW_Hide,SW_Maximize,SW_Minimize, 
SW_Restore,SW_Show,SW_ShowDefault,SW_ShowMaximized,SW_ShowMinimize), SW_ShowMinNoActive,SW_ShowNo,SW_ShowNoActivate,SW_ShowNormal);}