TEAM-ADA Archives

Team Ada: Ada Programming Language Advocacy

TEAM-ADA@LISTSERV.ACM.ORG

Options: Use Forum View

Use Proportional Font
Show Text Part by Default
Condense Mail Headers

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

Print Reply
Sender:
"Team Ada: Ada Advocacy Issues (83 & 95)" <[log in to unmask]>
From:
Date:
Fri, 24 May 2002 09:50:20 +0530
Content-type:
text/plain; charset=us-ascii
MIME-Version:
1.0
Reply-To:
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