Screen Saver Application In PowerBuilder
With API function SystemParametersInfoA Library user32.dll disables CTRL + ALT + DEL, ALT + TAB, CTRL + ESC. With Alt + F4 blocking, users are required to authenticate with the program’s account


Declare Local Functions
1 |
Function uLong SystemParametersInfoA (ulong uAction , ulong uparam, string lpvParam, ulong fuWinIni ) Library "User32.dll" alias for "SystemParametersInfoA;ansi" |
Example Open Event Window
1 2 3 4 5 6 7 8 9 10 11 12 |
Environment le_Env GetEnvironment(le_Env) Integer SPI_SCREENSAVERRUNNING = 97 This.Width = PixelsToUnits(le_Env.ScreenWidth + 128, XPixelsToUnits!) This.Height = PixelsToUnits(le_Env.ScreenHeight + 128, YPixelsToUnits!) This.X = - 64 This.Y = - 64 This.SetPosition(TopMost!) Integer i_ret i_ret = SystemParametersInfoA(SPI_SCREENSAVERRUNNING, 1, "", 0) |
Find Projects On Github click here
Good Luck!
Subscribe
Login
0 Comments
Oldest