1
在下面的程序中,whare是WinTypes
,WinProcs
和SW_NORMAL
的目的是什麼?什麼是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中。
原理上,我應該說「在即將到來的Win3.1x版本的Free Pascal中:-)」 –