I attach result on my PC with 1.9.2.0 + thinBASIC_Registry patch.
Petr
I thought it better to show a stand alone version which should work on all windows versions ??
Uses "Registry" Local Status1 As DWord Local Status2 As DWord Local sPath1 As String Local sPath2 As String Local sMsg As String Local sMsg1 As String Local sMsg2 As String sPath1 = "Software\microsoft\madeupname" sPath2 = "Software\microsoft\Windows" Status1 = Registry_PathExists("HKEYCU", sPath1) Status2 = Registry_PathExists("HKEYCU", sPath2) sMsg1 = Registry_GetAllKeys("HKEYCU", sPath1,",") sMsg2 = Registry_GetAllKeys("HKEYCU", sPath2,",") sMsg += "Status1 = "+Status1+$CRLF sMsg += "Status2 = "+Status2+$CRLF(2) sMsg += "sMsg1 Length = "+Len(sMsg1)+$CRLF sMsg += "sMsg2 Length = "+Len(sMsg2)+$CRLF MsgBox 0, sMsg Stop
Last edited by Michael Clease; 08-02-2013 at 12:17. Reason: typo
Home Desktop : Windows 7 - Intel Pentium (D) - 3.0 Ghz - 2GB - Geforce 6800GS
Home Laptop : WinXP Pro SP3 - Intel Centrino Duo - 1.73 Ghz - 2 GB - Intel GMA 950
Home Laptop : Windows 10 - Intel(R) Core(TM) i5-4210U CPU @ 1.70GHz, 2401 Mhz, 2 Core(s), 4 Logical Processor(s) - 4 GB - Intel HD 4400
Work Desktop : Windows 10 - Intel I7 - 4 Ghz - 8GB - Quadro Fx 370
I attach result on my PC with 1.9.2.0 + thinBASIC_Registry patch.
Petr
Learn 3D graphics with ThinBASIC, learn TBGL!
Windows 10 64bit - Intel Core i5-3350P @ 3.1GHz - 16 GB RAM - NVIDIA GeForce GTX 1050 Ti 4GB
Ok, I've just recompiled thinBasic_Registry.dll using PB9.x instead of PB10.x without making any change.
Attached the new version. Please place thinBasic_Registry.dll into \thinBasic\Lib\ directory replacing your current one.
Can you please see if this makes any difference?
www.thinbasic.com | www.thinbasic.com/community/ | help.thinbasic.com
Windows 10 Pro for Workstations 64bit - 32 GB - Intel(R) Xeon(R) W-10855M CPU @ 2.80GHz - NVIDIA Quadro RTX 3000
The result is different with this version, and I think it works correct in my opinion - with one little detail:
stores the value "CurrentVersion,DWM,Shell,TabletPC,Windows Error Reporting," in sMsg2. I think the last comma should not be there, because using PARSECOUNT I would think there were 6 keys, but in reality the path contains 5 keys.sPath2 = "Software\microsoft\Windows" ... sMsg2 = Registry_GetAllKeys("HKEYCU", sPath2,",")
Petr
Last edited by Petr Schreiber; 09-02-2013 at 11:49.
Learn 3D graphics with ThinBASIC, learn TBGL!
Windows 10 64bit - Intel Core i5-3350P @ 3.1GHz - 16 GB RAM - NVIDIA GeForce GTX 1050 Ti 4GB
Thanks Petr for testing.
So ... if now it seesm to work, there must be something in PB10.x compiler I need to investigate why is changing behave of Registry scanning.
Attached a new version that should fix separator problem.
www.thinbasic.com | www.thinbasic.com/community/ | help.thinbasic.com
Windows 10 Pro for Workstations 64bit - 32 GB - Intel(R) Xeon(R) W-10855M CPU @ 2.80GHz - NVIDIA Quadro RTX 3000
Thanks,
this version works okay for me.
Petr
Learn 3D graphics with ThinBASIC, learn TBGL!
Windows 10 64bit - Intel Core i5-3350P @ 3.1GHz - 16 GB RAM - NVIDIA GeForce GTX 1050 Ti 4GB
All looks good for me but until I can test it at work I wont be sure, some good has come from it though my script which has a "Start Date 18-03-2009" is a random mess and I have started cleaning it up and improving the way it actually works. I use the program every time I am on site with a custom, it is for creating a backup of the software driving the X-ray systems I work on.
thanks Eros for fixing it and Petr for testing
The issue with the comma was something I had seen and lived with for a very long time... don't know why I didn't report it??
Mike C.
Home Desktop : Windows 7 - Intel Pentium (D) - 3.0 Ghz - 2GB - Geforce 6800GS
Home Laptop : WinXP Pro SP3 - Intel Centrino Duo - 1.73 Ghz - 2 GB - Intel GMA 950
Home Laptop : Windows 10 - Intel(R) Core(TM) i5-4210U CPU @ 1.70GHz, 2401 Mhz, 2 Core(s), 4 Logical Processor(s) - 4 GB - Intel HD 4400
Work Desktop : Windows 10 - Intel I7 - 4 Ghz - 8GB - Quadro Fx 370
Bookmarks