Page 2 of 6

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Tue Apr 16, 2019 4:46 pm
by Fred
No difference performance wise.

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Tue Apr 16, 2019 4:54 pm
by skywalk
Nice 8)
This is great to get the SQLite bug fixes/improvements without delay or having to manage a SQLite wrapper.

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Tue Apr 16, 2019 6:04 pm
by majikeyric
Many thanks Fred and team ! :D

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Tue Apr 16, 2019 11:12 pm
by DeanH
Fred wrote:
DeanH wrote:Apologies for being a bit thick, but what is the flag please? I cannot seem to locate any information.
To access the database commands, are the normal PureBasic database functions used or DLL library functions?
Also, are there any plans to implement fts5 in the static lib?
The flag is just the DLL pathname, similar to UseMySQLDatabase(). About FTS5 and other option, that's also why the DLL is an option too, because SQlite can be built with a lot of flags and we can't support them all in a single static lib
Thank you very much for explaining. I have been able to now use the DLL. FTS5 does work, too, this way. Normal database functions work. Means minimal changes to my source code. Great!

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Wed Apr 17, 2019 7:06 am
by Maitre_Kanter
Thanks Fred and Fantasy team.

Do you plan to correct bugs about the Form Designer ?

I see the same old bugs since many years (e.g. columns management for listview). May be you are not aware of that.

Arnaud

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Wed Apr 17, 2019 7:47 am
by Little John
Thanks to the Fantaisie Software team for this new version, and thanks to RSBasic for the list of fixed bugs!

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Fri Apr 19, 2019 8:23 am
by VB6_to_PBx
i can't get this part of my PB Code to work anymore in PB5.71Beta1 ?? ... nothing shows or happens :(
please Fix
or suggest a fix

Code: Select all

              Case 160 : ;~~~~~     #Computer_Info = 4995           ;<--- Computer Info
              Case 161 : RunControlPanelApplet("intl.cpl")          ;<--- Region and Language Keyboard Settings
              Case 162 : RunControlPanelApplet("")                  ;<--- Control Panel Folder
              ;Case 163 : RunControlPanelApplet("appwiz.cpl")        ;<--- Install  or  Uninstall  Programs
              Case 164 : RunControlPanelApplet("desk.cpl,,2")       ;<--- Window's  Personalization  Settings
              Case 165 : RunControlPanelApplet("desk.cpl,,3")       ;<--- Screen  Resolution  Settings
              Case 166 : RunControlPanelApplet("desk.cpl,,1")       ;<--- Screen  Saver  Settings
              Case 167 : RunControlPanelApplet("mmsys.cpl")         ;<--- Sound Settings
              Case 168 : RunControlPanelApplet("timedate.cpl")      ;<--- Time and Date
              Case 169 : RunControlPanelApplet("main.cpl @0")       ;<--- Mouse Properties
              Case 170 : RunControlPanelApplet("main.cpl @1")       ;<--- Keyboard Properties
              Case 171 : RunControlPanelApplet("inetcpl.cpl")       ;<--- Internet Properties
              Case 172 : RunControlPanelApplet("ncpa.cpl")          ;<--- Network Connections
              Case 173 : RunControlPanelApplet("hdwwiz.cpl")        ;<--- Device Manager
              Case 174 : RunControlPanelApplet("powercfg.cpl")      ;<--- Power Options
              Case 175 : RunControlPanelApplet("firewall.cpl")      ;<--- Window's Firewall Settings
              Case 176 : RunControlPanelApplet("wscui.cpl")         ;<--- Windows Security Action Center Settings
              Case 177 : RunControlPanelApplet("wuaucpl.cpl")       ;<--- Automatic Updates
              Case 178 : RunControlPanelApplet("nusrmgr.cpl")       ;<--- User Accounts

Procedure it calls :

Code: Select all

Procedure RunControlPanelApplet(AppletName.s)
    Protected runstr.s = "rundll32.exe shell32.dll, Control_RunDLL " + AppletName.s
    ProcedureReturn WinExec_(runstr, #SW_SHOWNORMAL)
EndProcedure

==============================================================

However , this Code all still works in PB5.71Beta1 ! 8)

Code: Select all

              Case 180 : RunProgram("taskmgr.exe")
              Case 181 : RunProgram("notepad.exe")
              Case 182 : RunProgram("write.exe")
              Case 183 : RunProgram("calc.exe")
              Case 184 : RunProgram("mspaint.exe")
              Case 185 : RunProgram("wmplayer.exe")
              Case 186 : RunProgram("iexplore.exe")
              Case 187 : RunProgram("cmd.exe")
              Case 188 : RunProgram("shell:MyComputerFolder")
              Case 189 : RunProgram(HardDriveLetter)
              Case 190 : RunProgram("shell:sendto")
              Case 191 : RunProgram(WinDir)
              Case 192 : RunProgram("shell:Personal")
              Case 193 : RunProgram("shell:My Pictures")   ;~~~~~ RunProgram("shell:PicturesLibrary")
              Case 194 : RunProgram("shell:My Video")      ;~~~~~ RunProgram("shell:VideosLibrary")
              Case 195 : RunProgram("shell:My Music")      ;~~~~~ RunProgram("shell:MusicLibrary")
              Case 196 : RunProgram("shell:Recent")
              Case 197 : RunProgram("shell:History")
              Case 198 : RunProgram("shell:RecycleBinFolder")
              Case 199 : ShellAbout_(0," Windows","",0)    ;~~~~~ RunDLL_ShellDLL("ShellAboutA")


Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Fri Apr 19, 2019 8:33 am
by Marc56us
A .CPL file can run as normal exe. Just try Win+R and type "intl.cpl" (yes with extension)

So you can use .CPL (and any othe registered files type) directly:

Code: Select all

RunProgram("intl.cpl", "", "")
:wink:

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Fri Apr 19, 2019 6:48 pm
by VB6_to_PBx
Marc56us wrote:A .CPL file can run as normal exe. Just try Win+R and type "intl.cpl" (yes with extension)

So you can use .CPL (and any othe registered files type) directly:

Code: Select all

RunProgram("intl.cpl", "", "")
:wink:
in my 1st Post above , everything worked perfectly in PB5.41LTS -vs- PB5.71Beta1 ,

thanks Marc56us ,
RunProgram("intl.cpl", "", "") works for most of them :)

but these don't seem to work : :(
RunProgram("firewall.cpl","","") ;<<--- Window's Firewall Settings
RunProgram("wuaucpl.cpl","","") ;<<--- Automatic Updates
RunProgram("nusrmgr.cpl","","") ;<<--- User Accounts

and these just display the very same Screen : ( no differences )
RunProgram("desk.cpl","","1") ;<<--- Screen Saver Settings
RunProgram("desk.cpl","","2") ;<<--- Personalization Settings
RunProgram("desk.cpl","","3") ;<<--- Screen Resolution Settings

anyone know a Fix or Solution for these remaining 6 that don't quite work correctly ??

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Fri Apr 19, 2019 7:09 pm
by Little John
VB6_to_PBx wrote:in my 1st Post above , everything worked perfectly in PB5.41LTS -vs- PB5.71Beta1 ,
PB 5.41 is an old version with support for ASCII compilation. Starting with version 5.50, PB only supports Unicode compilation.

Did you use the ASCII compilation mode with PB 5.41? If so, that might explain the difference between your experiences with PB 5.41 and PB 5.71 beta 1, and WinExec_() might not be able to properly process a Unicode string as first parameter.

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Fri Apr 19, 2019 8:39 pm
by Paul
Looks like Little John called it with Ascii vs Unicode...

Code: Select all

Procedure.s Uni2Ascii(Pointer)
  Buffer.s=Space(512)
  WideCharToMultiByte_(#CP_ACP,0,Pointer,-1,@Buffer,512,0,0)
  ProcedureReturn Buffer
EndProcedure

Procedure RunControlPanelApplet(AppletName.s)
  Protected runstr.s = "rundll32.exe shell32.dll, Control_RunDLL " + AppletName.s
  ProcedureReturn WinExec_(Uni2Ascii(@runstr), #SW_SHOWNORMAL)
EndProcedure

RunControlPanelApplet("desk.cpl,,1")
RunControlPanelApplet("desk.cpl,,2")
RunControlPanelApplet("desk.cpl,,3")

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Fri Apr 19, 2019 8:51 pm
by VB6_to_PBx
Little John wrote:
VB6_to_PBx wrote:in my 1st Post above , everything worked perfectly in PB5.41LTS -vs- PB5.71Beta1 ,
PB 5.41 is an old version with support for ASCII compilation. Starting with version 5.50, PB only supports Unicode compilation.

Did you use the ASCII compilation mode with PB 5.41? If so, that might explain the difference between your experiences with PB 5.41 and PB 5.71 beta 1, and WinExec_() might not be able to properly process a Unicode string as first parameter.
Did you use the ASCII compilation mode with PB 5.41?
Yes .

However , now in PB5.41LTS with or without Encoding:UTF8 or with or without Compiler Options checked [x] Create Unicode Executable ... does not display any Screen popup
same thing happens with new PB5.71Beta1
RunProgram("firewall.cpl","","") ;<<--- Window's Firewall Settings
RunProgram("wuaucpl.cpl","","") ;<<--- Automatic Updates
RunProgram("nusrmgr.cpl","","") ;<<--- User Accounts

but , this all works correctly in PB5.41LTS "only" Compiling without Unicode
Case 161 : RunControlPanelApplet("intl.cpl") ;<--- Region and Language Keyboard Settings
Case 162 : RunControlPanelApplet("") ;<--- Control Panel Folder
;Case 163 : RunControlPanelApplet("appwiz.cpl") ;<--- Install or Uninstall Programs
Case 164 : RunControlPanelApplet("desk.cpl,,2") ;<--- Window's Personalization Settings
Case 165 : RunControlPanelApplet("desk.cpl,,3") ;<--- Screen Resolution Settings
Case 166 : RunControlPanelApplet("desk.cpl,,1") ;<--- Screen Saver Settings
Case 167 : RunControlPanelApplet("mmsys.cpl") ;<--- Sound Settings
Case 168 : RunControlPanelApplet("timedate.cpl") ;<--- Time and Date
Case 169 : RunControlPanelApplet("main.cpl @0") ;<--- Mouse Properties
Case 170 : RunControlPanelApplet("main.cpl @1") ;<--- Keyboard Properties
Case 171 : RunControlPanelApplet("inetcpl.cpl") ;<--- Internet Properties
Case 172 : RunControlPanelApplet("ncpa.cpl") ;<--- Network Connections
Case 173 : RunControlPanelApplet("hdwwiz.cpl") ;<--- Device Manager
Case 174 : RunControlPanelApplet("powercfg.cpl") ;<--- Power Options
Case 175 : RunControlPanelApplet("firewall.cpl") ;<--- Window's Firewall Settings
Case 176 : RunControlPanelApplet("wscui.cpl") ;<--- Windows Security Action Center Settings
Case 177 : RunControlPanelApplet("wuaucpl.cpl") ;<--- Automatic Updates
Case 178 : RunControlPanelApplet("nusrmgr.cpl") ;<--- User Accounts
along with
Procedure RunControlPanelApplet(AppletName.s)
Protected runstr.s = "rundll32.exe shell32.dll, Control_RunDLL " + AppletName.s
ProcedureReturn WinExec_(runstr, #SW_SHOWNORMAL)
EndProcedure


i'd love to get new PB5.71Beta1 to work correctly with :
RunProgram("firewall.cpl","","") ;<<--- Window's Firewall Settings
RunProgram("wuaucpl.cpl","","") ;<<--- Automatic Updates
RunProgram("nusrmgr.cpl","","") ;<<--- User Accounts
but nothing displays , no matter what settings i use :(

and these do not display correctly either no matter what i change in new PB5.71Beta1 :
RunProgram("desk.cpl","","1") ;<<--- Screen Saver Settings
RunProgram("desk.cpl","","2") ;<<--- Personalization Settings
RunProgram("desk.cpl","","3") ;<<--- Screen Resolution Settings

Little John , are they working for you in new PB5.71Beta1 in WIN10 ??
i'm testing in Windows 8.0 ... i need to test this in Win10

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Fri Apr 19, 2019 8:55 pm
by VB6_to_PBx
Paul wrote:Looks like Little John called it with Ascii vs Unicode...

Code: Select all

Procedure.s Uni2Ascii(Pointer)
  Buffer.s=Space(512)
  WideCharToMultiByte_(#CP_ACP,0,Pointer,-1,@Buffer,512,0,0)
  ProcedureReturn Buffer
EndProcedure

Procedure RunControlPanelApplet(AppletName.s)
  Protected runstr.s = "rundll32.exe shell32.dll, Control_RunDLL " + AppletName.s
  ProcedureReturn WinExec_(Uni2Ascii(@runstr), #SW_SHOWNORMAL)
EndProcedure

RunControlPanelApplet("desk.cpl,,1")
RunControlPanelApplet("desk.cpl,,2")
RunControlPanelApplet("desk.cpl,,3")
thanks Paul .... your Code solved it !!! :D
in Windows 8.0 ... so i'm quite sure it works in Win10 .

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Sat Apr 20, 2019 4:26 pm
by Blue
Thank you Fred, for this intermediate bug fix version. These should really come more frequently.
And many thanks as well to RSBasic for his list of solved bugs. Great idea !

Re: PureBasic 5.71 LTS beta 1 is out !

Posted: Sat Apr 20, 2019 9:56 pm
by Andre
Thank you for the update, Fred!
And thanks to RSBasic too, for the useful big-fix overview :D