Ich habe aus der Hilfe bei virtual pascal ein bsp., welches den rechner herunterfahren lässt kopiert. doch wenn ich es ausführen möchte schreibt das Programm:
Error 117: Undefined external symbol WinInitialize
Error: return code = 117
Hier der Qulltext, vielleich könnt ihr mir sagen,was da falsch ist:
Uses Os2Def, Os2PmApi;
{$PMTYPE VIO} // Text mode example
{$X+,T-} // Compiler settings
var
Ab : Hab; // Window handle
Mq : Hmq; // Message queue handle
fSuccess : Bool; // API success indicator
begin
Ab := WinInitialize(0);
Mq := WinCreateMsgQueue(Ab, 0);
// Prevent our program from hanging the shutdown. If this call is
// omitted, the system will wait for us to do a WinDestroyMsgQueue.
fSuccess := WinCancelShutdown(Mq, True);
// Shutdown the system!
Writeln(‚System Shutdown will now be attempted…‘);
fSuccess := WinShutdownSystem(Ab, Mq);
if fSuccess then
// Shutdown command succesful
else
Writeln(‚Shutdown attempt unsuccesful‘);
end.