Re: PureBasic 5.71 LTS beta 1 is out !
Posted: Tue Apr 16, 2019 4:46 pm
No difference performance wise.
http://www.purebasic.com
https://www.purebasic.fr/english/
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!Fred wrote: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 libDeanH 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?
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
Code: Select all
Procedure RunControlPanelApplet(AppletName.s)
Protected runstr.s = "rundll32.exe shell32.dll, Control_RunDLL " + AppletName.s
ProcedureReturn WinExec_(runstr, #SW_SHOWNORMAL)
EndProcedure
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")
Code: Select all
RunProgram("intl.cpl", "", "")
in my 1st Post above , everything worked perfectly in PB5.41LTS -vs- PB5.71Beta1 ,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", "", "")
PB 5.41 is an old version with support for ASCII compilation. Starting with version 5.50, PB only supports Unicode compilation.VB6_to_PBx wrote:in my 1st Post above , everything worked perfectly in PB5.41LTS -vs- PB5.71Beta1 ,
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")
Did you use the ASCII compilation mode with PB 5.41?Little John wrote:PB 5.41 is an old version with support for ASCII compilation. Starting with version 5.50, PB only supports Unicode compilation.VB6_to_PBx wrote:in my 1st Post above , everything worked perfectly in PB5.41LTS -vs- PB5.71Beta1 ,
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.
thanks Paul .... your Code solved it !!!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")