JohnLM

Update. . . on removing Windows updates via Powershell Using the following PS command to do the following: 1. wmic qfe list brief/format:table -- will show a table format view of all Updates in KBnnnnnnn, ie, KB5032005 2. wusa /uninstall /kb:5032005 -- will remove an update -- note: I follow this with a restart, but some KB's will inform you to restart I managed to remove the following KB's: (5032005, 5031988, 5011048 and (5015684=security update)) there were two more but they were not removed yet: (5031539 and 5032392) -- these were not removed due to an endless loop of restarting from the KB5015684 removal) So after performing most of the above KB's, I am now stuck (after the initial system Restart) in an endless loop of: 1. Preparing Automatic Repair startup screen 2. Diagnosing your pc 3. Blue Screen Automatic Repair -> Your PC did not start correctly -> [Restart] or [Advanced options]* * to try other options to repair your pc. So at this stage, my Chuwi Hi10 X tablet is unusable--it will not boot up into windows.

@ Nigel, I forgot all about that, thanks !

No, not yet, but I will be looking into that next after I image and create a restore point. Thanks for the link.

Thanks for that link. I tried almost all the selections (once created as a folder control applet on the desktop) and they work the same as in the Control Panel. And the ones that do not work in the Control Panel are the same ones that call the Settings app and close immediately. For what it is worth mentioning. . . { For quick testing of this issue, I use the step mentioned in my first post where I right-click on the desktop area and select 'Display settings'. The win+key command to bring up the change screen resolution is win+R+'ms-settings:display'. without the quotes... thus, win+R and enter ms-settings:display. (I'm sure there is a way to call those commands in a cmd dos window but I don't know the proper syntax for it. Then I would make a .bat file and easily call it during testing/debug.) 1. works in windows 10 home on my HP laptop 2. edit: does not work in windows 7 home premium on my Dell laptop -- win7 did not have this ms-xxx:xxx syntax option for bringing up windows applets. 3. does not work in windows 10 Enterprse on my Chuwi tablet }

It had occurred to me that I could also take out my Windows 10 Home HP laptop (model stream 14" with D11.2 and no Settings issue) and run some comparison tests while debugging the issues with the Chuwi tablet. The settings dialog box on your left is what used to come up on the tablet under win10 before the upgrade/update I performed on 11/16/23. The control panel on the right (in your image) is the one that always comes up if I use the start menu or win+r+'control panel' on HP laptop, both* come up. * Settings is what Control Panel was but enhanced, but people still call it control panel, I guess.

Fail... @ FPiette - in win10, the Control Panel is on the desktop. The way I determine two distinct folder locations (and file/app kind/type/etc) is to bring up the app's Properties and select [open folder location]. From there I can look at the file size, date, and so on. 1. using your suggestion to use the old 'control panel' is to press Win+R, enter 'control' and it opens the Control Panel 2. When I right-click on its icon in the Taskbar and then right-click on the menu item 'Control Panel' to pull up the Properties, the Target location points to the Desktop. 3. I get the same results when I select/click on [open file location] it opens Explorer to the desktop and points to 'Control Panel'. Note, I've also tried win+R and enter 'control.exe' and received the same results. So it appears the there is only one control panel version in win10 enterprise.

update... i've also tried adding a new user account. . . 1. create a restore point 2. add a new user account via CMD prompt(s): net user user2 password_xxxxx /add net localgroup administrators user2 /add 3. restart 4. log into new user2 account 5. access the Settings app, failed! I have the same situation as posted above, the Settings dialog box with the gear pops up and closes.

I was going to ask, how do I undo an update, but it requires the Settings app. Arh!! Settings just closes. Is there any other way to undo an Update?

Still researching this issue... I booted Windows into safe mode, and Settings still not loading.

@ fpiette - the following are the specs: Windows 10 Enterprise [10.0.19045.3693 as of 11/16/2023] Chuwi Hi10 X 10.1" / 128GB SSD / 6GB Ram / 1920x1200 pixels tablet Intel Celeron N4120 (Gemini Lake) 1.10GHz 4-cores cpu with UDH Graphics 600 BIOS: UEFI * I purchased the tablet Sept/2023, but did not open and use it until 11/11/2023. Windows ver was at 10.01.19045.3570 and during that time right up to 11/15. * Then, I activated Windows on 11/16. * And then it proceeded to upgrade to 22H2, which I believe is the final version for win10. * Shortly after that, is when I discovered that I could no longer launch the Settings app.

In my searches to date, I have read that this same issue is also in Windows 11 and users are suffering from this same issue. And, considering that I was affected by this on this tablet, there is a good chance that I will continue to have this issue in win11.

For some time I was wondering how I could create a nice output from data I have. One day I was looking at some learning video or website--I can't remember. And I saw how some easily create an output that included text and images. If I recall, he used HTML at the time, but I'm not sure since it was a long time ago. Then, today, I was looking at some items in the GetIt portion of the welcome screen. Then, moments later I decided to click on the 'getit package manager' and that's when it hit me, again, the idea of creating a custom output view similar to that. So, I was wondering if I could create something similar in Delphi with the built-in components I already have--be it HTML code (howto) or a combination of components already in Delphi, for VCL and FMX/Mobile. * This D12 getit pkg mgr snippet taking from my tablet and down-resized 1920x1200, 50% * notice the output on the right side pane area, that is the design output I am seeking to create Does anyone have any suggestions on how I can proceed in this endeavor? What are your methods? TIA

@ Alexander S - Thanks for your reply. I will look into your second suggestion. ** The TControlList ** I checked out the TControlList and found a video by Alister and he gave a brief tutorial using a TClientDataset. I copied to code snippet from the screen in the video and tried and it worked. It was a nice output. I just need to play around with it to get a better feel for my needs and what I may use it for in the future. So thanks, Alister.

I use these little-known keyboard secrets... On my laptop, I use shift+insert On my bluetooth keyboard, since I don't have the [insert] key, I use CTRL+Shift+V Both methods work for me in XE7, 11.2 and on my laptop with windows 7 And on my Chuwi Hi10X win10 tablet, these methods work in 11.2 and 12.0 using a bluetooth keyboard with Ctrl+Shift+V

update.. I've also compiled the test app in Delphi 11 and 12 on my Chuwi Hi10X tablet. 11.2 works fine, but 12.0 hit or miss. Sometimes the machine locks up, other times the window (the memo) is blank. Makes no sense to me, but I'm late for work and will have to figure it out later.

Specs: win10, delphi 12, VCL app design I am searching for the best or optimum way of pulling all filenames (and folder names) from my current tablet. The hdd is an SSD. In the past, I used to use a dos command and run dir c:\*.* /A x y z >h:\cdrive.txt and save that as a text file to archive. But its been a long time since I've performed this and can't remember the exact parameters I used to use. That was windows XP and early windows 7 desktop pc. Now I want to do the same in a dos window, but I see the command seems to have changed and/or new ones added since. This is windows 10 now. I would use Delphi command instead but I'm not savy in that area. So I want to continue doing it the dos way if possible, or I would like to try both methods: dos and delphi. The reason I've used the dos method is because it is the fastest. There was a command to turn off screen updates and it would fly, 1, 2, 3 and it was done. TIA

I have updated the source code to include the time info (in the sec 4 portions of the source code, in the previous post above). Here is a demo of the final output: 1/27/2016 12:11:27 AM | Project2.cfg | I:\delphi\d7\Activity List\ver01 1/27/2016 12:11:27 AM | Project2.dof | I:\delphi\d7\Activity List\ver01 1/27/2016 12:11:27 AM | Project2.dpr | I:\delphi\d7\Activity List\ver01 1/27/2016 12:11:27 AM | Project2.exe | I:\delphi\d7\Activity List\ver01 1/27/2016 12:11:27 AM | Project2.res | I:\delphi\d7\Activity List\ver01 1/27/2016 12:11:27 AM | Unit1.dcu | I:\delphi\d7\Activity List\ver01 1/27/2016 12:11:27 AM | Unit1.ddp | I:\delphi\d7\Activity List\ver01 1/27/2016 12:11:27 AM | Unit1.dfm | I:\delphi\d7\Activity List\ver01 1/27/2016 12:11:27 AM | Unit1.pas | I:\delphi\d7\Activity List\ver01 1/27/2016 12:11:28 AM | Unit1.~ddp | I:\delphi\d7\Activity List\ver01 1/27/2016 12:11:28 AM | Unit1.~dfm | I:\delphi\d7\Activity List\ver01 1/27/2016 12:11:28 AM | Unit1.~pas | I:\delphi\d7\Activity List\ver01 1/27/2016 12:11:32 AM | Project1.dof | I:\delphi\d7\hdd serial\v01 1/27/2016 12:11:32 AM | Project1.dpr | I:\delphi\d7\hdd serial\v01 1/27/2016 12:11:32 AM | hdd.s.exe | I:\delphi\d7\hdd serial\v01 1/27/2016 12:11:33 AM | Project1.res | I:\delphi\d7\hdd serial\v01 1/27/2016 12:11:33 AM | Unit1.dcu | I:\delphi\d7\hdd serial\v01 1/27/2016 12:11:33 AM | Unit1.dfm | I:\delphi\d7\hdd serial\v01 1/27/2016 12:11:33 AM | Unit1.pas | I:\delphi\d7\hdd serial\v01 1/27/2016 12:11:33 AM | Unit1.~dfm | I:\delphi\d7\hdd serial\v01 1/27/2016 12:11:33 AM | Unit1.~pas | I:\delphi\d7\hdd serial\v01 7/10/2016 11:10:03 PM | Unit2.fmx.~1~ | I:\delphi\xe7\FMX\fishfacts\v01\__history 7/10/2016 11:10:03 PM | Unit2.vlb | I:\delphi\xe7\FMX\fishfacts\v01 7/10/2016 11:10:08 PM | Project1.dpr | I:\delphi\xe7\FMX\fishfacts\v01 7/10/2016 11:10:08 PM | Project1.dproj | I:\delphi\xe7\FMX\fishfacts\v01 7/10/2016 11:10:24 PM | Unit2.dcu | I:\delphi\xe7\FMX\fishfacts\v01\Win32\Debug 7/10/2016 11:10:24 PM | Project1.exe | I:\delphi\xe7\FMX\fishfacts\v01\Win32\Debug 7/10/2016 11:10:23 PM | Project1.res | I:\delphi\xe7\FMX\fishfacts\v01 7/10/2016 11:10:03 PM | Unit2.pas | I:\delphi\xe7\FMX\fishfacts\v01 7/10/2016 11:10:03 PM | Unit2.fmx | I:\delphi\xe7\FMX\fishfacts\v01 7/10/2016 11:10:08 PM | Project1.dproj.local | I:\delphi\xe7\FMX\fishfacts\v01 7/10/2016 11:17:48 PM | Project1.identcache | I:\delphi\xe7\FMX\fishfacts\v01 9/16/2017 11:15:18 PM | readme_KEEP.txt | I:\delphi\xe7\FMX\fishfacts\v01 11/13/2016 1:00:08 PM | data_Notes20161113sun1259pm.zi | I:\delphi\misc 1/13/2019 1:47:50 PM | data_Notes20190113sun0139pm.zi | I:\delphi\misc

I now have the date included. Again, this is not efficient, and with every new piece I add to the code, it gets slower, but still works. Below is the updated source code with added functions. Next, I will add the filename timestamp... uses strutils; // sec 1 function GetFileCDateTime(FileName: String): TDateTime; begin GetFileCDateTime := 0; If (FileName <> '') and (FileExists(FileName) = True) then begin GetFileCDateTime := TFile.GetCreationTime(FileName); end; end; // sec 2 function padspaceRT(S: string; Len: Integer): string; begin // this is my custom-made string padder, it insers spaces to a given length - its prob the slowest part and can be enhanced i'm sure. s := midstr(s,1,len); result := S; // give it a value right away. while Length(Result) < Len do Result := Result + ' '; end; // sec 3 function padspaceLF(S: string; Len: Integer): string; begin result := S; // give it a value right away. while Length(Result) < Len do Result := ' ' + Result; end; // sec 4 procedure tform1.findfiles(list: tstrings); begin list.Clear; var sw := TStopwatch.StartNew; var fname, fdate, ftime: string; var FileARR := TDirectory.GetFiles(eb1.text, '*', TSearchOption.soAllDirectories); var DateARR := tdirectory.GetCreationTime(eb1.Text); for fname in fileARR do begin fdate := datetostr(getfilecdatetime(fname)); ftime := timetostr(getfilecdatetime(fname)); list.Add(padspaceLF(fdate,12) + ' ' + padspaceLF(ftime,12) + ' | ' + padspaceRT(tpath.GetFileName(fname),30) +' | ' + TPath.GetDirectoryName(fname)); end; st1.Caption := Format('%d Files, %d ms, (%f s) ', [Length(FileARR), sw.ElapsedMilliseconds, sw.ElapsedMilliseconds / 1000]); end; // sec 5 procedure TForm1.btnPullClick(Sender: TObject); begin m1.Lines.Clear; // tmemo m1.Lines.BeginUpdate; // for speed but prob not necessary try findfiles(m1.Lines); except on E: Exception do Writeln(E.ClassName, ': ', E.Message); end; m1.Lines.EndUpdate; end;

After some mods and additions to the code I managed to get the filenames and folder names to display. The only problem I am having is with getting the date, mod date, and time. I believe it is TDirectory.GetCreationDate() My updated code snippet, below. I'm sure it can be enhanced better and/or less, but it works. uses strutils; function padspaceRT(S: string; Len: Integer): string; begin // this is my custom-made string padder, it insers spaces to a given length - its prob the slowest part and can be enhanced i'm sure. s := midstr(s,1,len); result := S; // give it a value right away. while Length(Result) < Len do Result := Result + ' '; end; procedure tform1.findfiles(list: tstrings); begin list.Clear; var sw := TStopwatch.StartNew; var fname: string; var FileARR := TDirectory.GetFiles(eb1.text, '*', TSearchOption.soAllDirectories); var DateARR := tdirectory.GetCreationTime(eb1.Text); for fname in fileARR do begin list.Add(padspaceRT(tpath.GetFileName(fname),30) +' -- ' + TPath.GetDirectoryName(fname)); end; list.add(Format('%d Files, %d ms', [Length(FileARR), sw.ElapsedMilliseconds])); end; procedure TForm1.btnPullClick(Sender: TObject); begin m1.Lines.Clear; // tmemo m1.Lines.BeginUpdate; // for speed but prob not necessary try findfiles(m1.Lines); except on E: Exception do Writeln(E.ClassName, ': ', E.Message); end; m1.Lines.EndUpdate; end;

I will attempt to add Uwe's code snippet along with the other snippets I found and tried, into the VCL app I was working on...

I ran the code again, 11.x seconds both stopwatches. By this time it was reading cached memory, but accurate.

Uwe's code snippet (above), On my win7 laptop (sandybridge i3-2370M 2.40GHz cpu), first run, it was 681,960 files, 418185ms (6969.75 secs) but my cellphone stopwatch said +/- 7m:30s

I've been at this since I first wrote this topic, but I did not receive a notification of a reply. Anyway. I've found the params that I used to use and tried them. They work okay, but rethinking this project idea I decided to go the delphi route and I've been searching around for old code that I once tried before and had it working then but I can't find it. It was a project I started about 7 years ago and lost code snippet I was working on. All I have is the incomplete app. Now I am re-researching old and new code snippets via google and found several so far. But I've had mixed results with them. I want to include the recursive portion. That was the hardest part for me to understand back then, and now I want to try and figure it out again and get working. In one of the example recursive snippet I found via google, I entered c:\windows as the search path to recursive folder lookup and it took over 15 minutes to complete and give me 126,504 files. I will do further searches for more efficient code snippets in this area. Next time I will test on a smaller set of recursive folders.

Hi, I just realized that I am installing the wrong Delphi version on a new tablet. Embarcadero was quick to supply me a registration bump (from 2 to 3) and I was able to begin the installation of Delphi 12.., or so I thought. However, I grabbed the wrong .iso file folder "RADStudio_11_2_10937a" and began installing it. It should have been the "RADStudio_12_0_4915718.iso" file. Being so used to the Rad Studio 11 logo, I over looked it--twice! I am currently at the "specify location" dialog. Is it too late for me to stop and cancel the install and restart but with the "RADStudio_12_0_4915718.iso" file?

Success !! I now have both Delphi 11 and 12 installed on my new Windows 10 tablet. Both are up and running without conflicts or issues. Tablet Specs: Chuwi Hi10 X 10.1 in, 128GB SSD 6GB RAM Windows 10, 1920x1200, Intel Celeron N4120 (Gemini Lak) 4-core cpu. Known issues: *1 BSOD - Stop Code: MEMORY MANAGEMENT *2 BSOD - IRQL NOT LESS OR EQUAL (blue screen of death) I've mainly only been getting issues showing *2