求 非EXE后缀的文件 以EXE执行文件方式运行方法
求 非EXE后缀的文件 以EXE执行文件方式运行方法！

比如： cc.exe 后缀改名 cc.dat

如何运行CC.DAT呢？

别拿这个来忽悠
ShellExecute(Handle, 'open', pChar('cmd.exe'), PChar('/c c:\cc.dat'), nil, SW_HIDE);

[解决办法]

var
  si: TStartupInfo;
  pi: TProcessInformation;
const
  path = 'c:\cc.dat';
begin
  ZeroMemory(@si, SizeOf(si));
  ZeroMemory(@Pi, SizeOf(pi));
  si.cb := SizeOf(si);

  if CreateProcessA(path, '', nil, nil, False, 0, nil, nil, si, pi) then
  begin
    CloseHandle(pi.hProcess);
    CloseHandle(pi.hThread);
  end;
end;