B4J Library SD_NativeAccess (jna)

This library allows access to the jna to use some functions for managing windows and applications.
You need to get these JARs and include them in the additional libraries folder: jna-5.10.0 and jna-platform-5.10.0

With this library you can obtain the Handle of the applications that run on your Windows PC, both visible and invisible ones. A bit like you would with the task manager.
From the Hande you can get the name of the window, the coordinates and dimensions and finally the file name and path of the app.
There are many other functions that can be implemented with jna, as soon as I have time I will add a few more

SD_NativeAccess

Author: Star-Dust
Version: 1.07

• Na_Rectangle
  • Fields:
    • Height As Int
    • IsInitialized As Boolean
      Verifica se l'oggetto sia stato inizializzato.
    • Left As Int
    • Top As Int
    • Width As Int
  • Functions:
    • Initialize
      Inizializza i campi al loro valore predefinito.
• NativeAccess
  • Functions:
    • Class_Globals As String
    • FlashWindow(Handle As Object, Count As Int, DurateMillisec As Int, BlinkType As Int)
    • GetCOM As List
      USB or COM
    • GetIdleTime As Long
    • GetListWindowsHandle (OnlyVisible As Boolean) As List
    • GetListWindowsTitle (OnlyVisible As Boolean) As List
    • GetRegisterCurrentUser (KeyPath As String, KeyValue As String) As String
    • GetRegisterLocalMachine (KeyPath As String, KeyValue As String) As String
    • GetUSB As List
    • GetWindowRect (Handle As Object) As Na_Rectangle
    • GetWindowsActiveTitle As String
    • Initialize As String
      Initializes the object. You can add parameters to this method if needed.
    • IsInitialized As Boolean
      Verifica se l'oggetto sia stato inizializzato.
    • KillWindowsByHandle (Handle As Object) As String
    • KillWindowsByName (Title As String) As String
    • Minimize (Handle As Object) As String
    • Monitor (On As Boolean) As String
    • RenameWindow (WindowsTitle As String, NewTitle As String) As Boolean
    • SetForegroundWindow (Title As String) As String
    • SetWindowRec (Handle As Object, Left As Int, Top As Int, Width As Int, Height As Int) As String

Update

• rel 1.01
  • Add Monitor (On As Boolean)
• rel. 1.02
  • Added GetUSB
    returns the list of installed usb devices
  • Added GetCOM
    returns the list of serial port
  • Added GetIdleTime
    returns the user's idle time
• rel 1.03
  • Added GetRegisterCurrentUser (KeyPath As String, KeyValue As String) As String
• rel 1.04
  • Added GetRegisterLocalMachine (KeyPath As String, KeyValue As String) As String
• rel 1.05
  • Added KillWindowsByName and KillWindowsByHandle
• rel 1.06
  • Added FlashWindow
• rel 1.07
  • Added RenameWindow

 

[Star-Dust]

example

 

[Star-Dust]

Update rel 1.01

• Add Monitor (On As Boolean)
  Turn On or Off the monitor

Na.Initialize
Na.Monitor(False)
Sleep(500)
Na.Monitor(True)

 

[Star-Dust]

Update rel 1.02

• Added GetUSB
  returns the list of installed usb devices
• Added GetCOM
  returns the list of serial port
• Added GetIdleTime
  returns the user's idle time

 

[Star-Dust]

Update rel 1.03

• Addes GetRegisterCurrentUser (KeyPath As String, KeyValue As String) As String

[CODE lang="b4x" title="Sample"]Log(Na.GetRegisterCurrentUser("SOFTWARE\Microsoft\Windows\CurrentVersion\Extensions","rtf"))[/CODE]

 

[Cableguy]

Hi @Star-Dust

Could you take a look at this and see if/how it could be implemented into or using your lib?

 

[Star-Dust]

UPDATE rel 1.04

• Added GetRegisterLocalMachine (KeyPath As String, KeyValue As String) As String

UPDATE Rel 1.05

• Added KillWindowsByName and KillWindowsByHandle

 

[Cableguy]

Hi @Star-Dust

Could you take a look at this and see if/how it could be implemented into or using your lib?

Hi @Star-Dust , any chance of taking a look at this one?

 

[Star-Dust]

Unfortunately I don't have Windows 11 and can't try it

 

[Cableguy]

Unfortunately I don't have Windows 11 and can't try it :-(

I can be your test subject if you want... maybe creating a 31 function lib" just to try it out...
This would be very beneficial to all B4J users...

 

[jmon]

Hi, thank you for your work.
Would it be possible to add "flashwindow" (True / False)?

FlashWindow function (winuser.h) - Win32 apps

Flashes the specified window one time. It does not change the active state of the window.

learn.microsoft.com

 

[Star-Dust]

Hi, thank you for your work.
Would it be possible to add "flashwindow" (True / False)?

FlashWindow function (winuser.h) - Win32 apps

Flashes the specified window one time. It does not change the active state of the window.

learn.microsoft.com

I checked, yes you can get it

 

[Cableguy]

Hi @Star-Dust

Could you take a look at this and see if/how it could be implemented into or using your lib?

Hi @Star-Dust,

Did you ever got to take a look at this one?
For those of us who like to use custom Title Bars, having to choose the native Tittle bar just to keep this functionality is hard, because it gives a bad user experience in some cases not to have it...

 

[Star-Dust]

Hi @Star-Dust,

Did you ever got to take a look at this one?
For those of us who like to use custom Title Bars, having to choose the native Tittle bar just to keep this functionality is hard, because it gives a bad user experience in some cases not to have it...

Dear friend,

You have already asked me this question privately and I replied that I don't use Windows 11, that jna 5 is not set up. To understand how it works it will take a lot of time to do tests in addition to Windows 11 and unfortunately there is no such time.
If they are small and quick things I will gladly add them.

 

[byz]

Is it possible to add a feature that disables Windows logo keys for full-screen and locked application scenarios?

 

[Star-Dust]

Is it possible to add a feature that disables Windows logo keys for full-screen and locked application scenarios?

I don't know this function, you can search for it in the jna documentation found in the first post.

 

[byz]

I don't know this function, you can search for it in the jna documentation found in the first post.

hi,sd,i found it .
JNA document address: https://javadoc.io/doc/net.java.dev.jna/jna/5.6.0/index.html

Method: WinUser.LowLevelKeyboardProc

Reference code:https://www.codeleading.com/article/71684641495/

 

[Star-Dust]

UPDATE Rel 1.07

• Added RenameWindow

Added a new function that changes the title to the windows. Attention may not work on all applications.

    For Each Title As String In Na.GetListWindowsTitle(True)
        Log(Title)
        If Title.Contains("Form") Then
            Dim Success As Boolean =  Na.RenameWindow(Title,"Hallo")
            Log("Rename: " & Success)
        End If
    Next

Update JNA to version 5.10, find the link to the first post of this thread

 

[Patent]

UPDATE Rel 1.07

• Added RenameWindow

Added a new function that changes the title to the windows. Attention may not work on all applications.

    For Each Title As String In Na.GetListWindowsTitle(True)
        Log(Title)
        If Title.Contains("Form") Then
            Dim Success As Boolean =  Na.RenameWindow(Title,"Hallo")
            Log("Rename: " & Success)
        End If
    Next

Update JNA to version 5.10, find the link to the first post of this thread

Thanks for this.
Where could i find 1.07?
First Post is 1.06

greets