Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Library: Windows API / MS.NET Framework API (https://www.delphipraxis.net/20-library-windows-api-ms-net-framework-api/)
-   -   Delphi Wie Strg+Alt+Entf sperren und wieder freigeben unter Win9x? (https://www.delphipraxis.net/2611-wie-strg-alt-entf-sperren-und-wieder-freigeben-unter-win9x.html)

Daniel B 30. Jan 2003 18:25
Wie Strg+Alt+Entf sperren und wieder freigeben unter Win9x?
 
Sperren:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  SystemParametersInfo(SPI_SCREENSAVERRUNNING, 1, PNonClientMetrics(10), 1);
end;
Freigeben:
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
begin
  SystemParametersInfo(SPI_SCREENSAVERRUNNING, 0, PNonClientMetrics(10), 1);
end;
Grüsse, Daniel :hi:


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:14 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz