TEAM-ADA Archives

Team Ada: Ada Programming Language Advocacy

TEAM-ADA@LISTSERV.ACM.ORG

Options: Use Classic View

Use Monospaced Font
Show HTML Part by Default
Condense Mail Headers

Topic: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Sender: "Team Ada: Ada Advocacy Issues (83 & 95)" <[log in to unmask]>
Date: Fri, 24 May 2002 09:50:20 +0530
Content-type: text/plain; charset=us-ascii
MIME-Version: 1.0
Parts/Attachments: text/plain (16 lines)
with Win32.Winreg;
use  Win32.Winreg;

procedure SystemShut is

   Issucess      : Win32.BOOL;
    begin
      Issucess:=InitiateSystemShutdown
                  (null,null,0,WIN32.FALSE,WIN32.TRUE);
end SystemShut;


This programme is to initiate the system shut down, but the function is
returning false, which means there is a error.
Can anyone fix.

ATOM RSS1 RSS2