В программе ниже, 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 :-)» –