Registry Module (windows only)

[AZJIO]

Should there be some kind of warning if someone on Linux wants to use this?

[ChrisR]

Yes, a compiler error

[AZJIO]

Yes, a compiler error

A compiler error may indicate an incorrectly written function.
What if the function is from PureLibraries?

[ChrisR]

I was joking but it's a good question for libraries that are not cross-platform

[Randy Walker]

Should there be some kind of warning if someone on Linux wants to use this?

Probably not since the subject line clearly shows (windows only). which probably also excludes MAC as well.

[Randy Walker]

Yes, a compiler error

Ooops. Looks like someone didn't read the subject line and tried it anyway. Subject lines can be so tricky that way.

[AZJIO]

Probably not since the subject line clearly shows (windows only). which probably also excludes MAC as well.

Even if (windows only) were not specified, everyone already knows that the registry exists only in Windows. When the library is compiled, it will not know which forum thread it was compiled from. To do this, the library must have some kind of flag to warn the user that this library is not intended for this OS.
When compiled, all debugger messages will be removed, so embedding a debugger message will not work.

Ooops. Looks like someone didn't read the subject line and tried it anyway. Subject lines can be so tricky that way.

There are no people here who will try the registry functions in Linux

[Randy Walker]

Hello at all
I'm trying to get a list of installed programs, with some parameters.
Can anyone help me?

I think this collects all installed programs using the native Windows "winget" command:

Code: Select all

Exe = RunProgram("powershell.exe","winget list","",#PB_Program_Hide|#PB_Program_Open|#PB_Program_Read|#PB_Program_Error)
Debug "Please wait for info to be collected"
If Exe
    While ProgramRunning(Exe)
      If AvailableProgramOutput(Exe)
        Output$=ReadProgramString(Exe)
        name$ = StringField(Output$,1,"  ")
        Debug Output$
        ;Debug name$
      EndIf
    Wend
EndIf

Sorry, I don't see any parameters.

[jacdelad]

On 6.40 Beta 1 I get an IMA for the "OpenKeyS"-macro. Seems to be directly related the new string system. Could someone more experienced please take a look?

[mk-soft]

It is PB v6.40 is alpha and must first be tested by us all string functions

Please do not post error messages in other code examples

[Randy Walker]

Old bugs good, new bugs bad! Updates are evil: might fix old bugs and introduce no new ones.

FINALLY... Someone who agrees with me.

[jacdelad]

Regarding version 1.5.3 (as seen here: viewtopic.php?p=632329#p632329):

- Line 331 -> CopyTree always returns #False. This line needs to be commented out/deleted.
- Line 599 -> "We don't free the memory"...ok, but what if *Ret is "0" (the If/EndIf from line 595 to 598)? The pointer to the memory block is stored nowhere and it's never freed (as it can't be freed because the pointer isn't saved anywhere). Between line 597 and 598 insert

Code: Select all

Else
FreeMemory(*lpData)

- Lines 612 to 615 -> The Memory is doubled on line 615. Is another doubling on line 613 really necessary for Unicode?
- Lines 743 to 768 -> #REG_MULTI_SZ awaits a second \0 at the end of the string (see table: https://learn.microsoft.com/en-us/windo ... alue-types). Between line 744 and 745 should be a line

Code: Select all

lpcbData = SizeOf(Character)

which automatically adds the second \0 to the memory block. Then also line 749 needs to be changed to

Code: Select all

If lpcbData > SizeOf(Character)

In addition line 747 could be changed to

Code: Select all

pcbData + StringByteLength(tmp, #PB_Unicode) + SizeOf(Character)