Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 176
  • Last Modified:

Is Windows running in Safe Mode?

Is there a way to detect if Windows 95 is currently running in SAFE MODE from my Delphi 1.0 application?  If so, how?
0
Kapusta
Asked:
Kapusta
  • 4
  • 4
1 Solution
 
ronit051397Commented:
0
 
ronit051397Commented:
Sorry, mistake. I intended to comment to another question.
0
 
KapustaAuthor Commented:
Adjusted points to 100
0
Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

 
KapustaAuthor Commented:
Adjusted points to 175
0
 
ronit051397Commented:
I think you should use: GetSystemMetrics(SM_CLEANBOOT)
For more information See API's Help file.
0
 
KapustaAuthor Commented:
>>I think you should use: GetSystemMetrics(SM_CLEANBOOT)
>>For more information See API's Help file.


Perhaps you are correct...however, my Delphi 1.0 API help file shows nothing on the SM_CLEANBOOT parameter.  The GetSystemMetrics API .HLP page knows nothing about SM_CLEANBOOT. I will try checking the search engines for SM_CLEANBOOT and see what I uncover.

Thanks.
0
 
KapustaAuthor Commented:
It turns out that although SM_CLEANBOOT is NOT a predefined variable, its value (67) will return the necessary result value.

var
      SafeMode : Integer;
begin
      SafeMode := GetSystemMetrics(67 {SM_CLEANBOOT});
      case SafeMode of
            1, 2: begin
   {1 = Safe mode, 2 = Safe mode with network support}

I believe you deserve the 175 points since you pointed me in the right direction.  How do I make sure that you get credit for your response?


0
 
ronit051397Commented:
I have just posted an answer...
0

Featured Post

Hire Technology Freelancers with Gigs

Work with freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely, and get projects done right.

  • 4
  • 4
Tackle projects and never again get stuck behind a technical roadblock.
Join Now