Question

在下面的程序中，whare是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中。

Answer 1

Wintypes和winprocs是翻译Windows 3.x标题，随Windows Turbo Pascal和Delphi 1一起提供。在后来的Delphi版本中，它们被更多的＃34;现代＆＃34; （如1995年之后）win32 Windows单元。

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

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

你的程序很奇怪，因为它使用win 3.x apis来调用Windows NT +＆＃34; cmd.exe＆＃34;。

什么是WinTypes，WinProcs和SW_NORMAL？

1 个答案: