1

在下面的程序中,WinTypes什么WinProcs是 , 的目的是SW_NORMAL什么?

program ex;
uses Wincrt,WinTypes, WinProcs;
var
  ch:string;

procedure exe (che:string);
begin
  writeln('ecrire ch');
  readln(che);
  if ch ='oui' then
  begin
    WinExec('cmd /k "C:\TPW\exercice\project\site.html"', SW_NORMAL);
  end;
end;

begin
  exe(ch);
end.

代码在 Turbo Pascal 1.5 中。

4

1 回答 1

2

Wintypes 和 winprocs 是 Turbo Pascal 和 Delphi 1 的 Windows 版本附带的 Windows 3.x 头文件。在后来的 Delphi 版本中,它们被称为更“现代”(如 1995 年之后)的 win32 Windows 单元。

SW_NORMAL 是 winexec 的一个参数,其中包含有关生成程序窗口的信息。

您可以在 MSDN 中查找 Windows 功能(甚至是像这样的古老功能),这将为您提供WinExec的链接,该链接可链接到Showwindow以获取各种 Windows 选项及其说明。

您的程序很奇怪,因为它使用 win 3.x api 调用 Windows NT+“cmd.exe”。

于 2017-01-13T20:10:53.653 回答