Fudley

I'm at 12.1 patch 1. Everything is working fine.

Oh I like that dockable AI Chat Panel

That Smart Codeinsight sounds great! Thanks for the link.

Windows 11 Delphi 12.1 (haven't dived into 12.2 yet) GExperts, CnPack, MMX are installed. Right-clicking on the toolbars and selecting "Customize" I can then arrange the toolbars and icons, add new icons etc. All is well until I restart Deephi, and the toolbars are not as I left them. Some icons are missing. Some toolbars have blank spaces where the icons should be. I have tried locking the toolbars, and saving the desktop. Has anyone else run into this?

Oh well, provides a nice warm up phase before coding 🌞

I'm looking for an XML library to use on Android. I am used to using NativeXML under Windows, so anything similiar to that would be perfect. Thanks much!

Just to confirm - VerySimpleXML is great. Took about 30 seconds to understand and implement Loadfrom/Saveto streams. Wow. Great job Dennis D. Spreen!

I'm looking at VerySimpleXML - I think I can work with this one.

I am trying to deploy a prepared .db file (sqlite) with my app. I have included the file ( fudley.db ) in the deployment list as follows: -local path being the development folder where the app is built (i.e. blank) -local name is fudley.db -remote path being "assets\internal\" -Overwrite set to always the rest of the settings are default. However it is never overwritten. If I add new data to the .db file, and build the APK and run it, the data on the target phone is still the same. Uninstall the app on the target phone and reinstall = same results. Clear the apps cache and data on the target phone = no change. Any thoughts?

I've attached a screenshot. I started up Delphi 12 and alI I get is a top bar 103 pixels tall. And nothing I do can restore it to its original size. I use GExperts, CnPack and MMX.

Update : it took an agressive uninstall and manual uninstall and reinstall of delphi, but I'm happy to report I'm back in the saddle. 🤠🏇

Tried the reinstall route. Ended up no longer registered to use Delphi! 😂. Can't make this stuff up... I bought a fairly pricey professional license bought about 6 months ago, but now can't run delphi at all (i try but am told "nope" by a harsh little screen) Maybe they have a support phone number i can call Monday. . Anyways, not your problem. Thanks so much for all the suggestions. This is a very helpful group.

Trying to reference the events for a TListBox in order to save and restore them. This is so I can make changes to the listbox without triggering the events, then restore the events. However I'm having trouble with FMX.ListBox.TCustomListBox.OnItemClick as Delphi suggests that TItemClickEvent is an undeclared identifier. Thoughts?

Dave - the inline method worked great thanks!

Thanks Dave, Remy! Here's my reproducible (at least for me) example: unit testlistboxerror1; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Controls.Presentation, FMX.StdCtrls, FMX.Layouts, FMX.ListBox; type TForm1 = class(TForm) Button1: TButton; ListBox1: TListBox; procedure Button1Tap(Sender: TObject; const Point: TPointF); procedure NoEventSetListBoxIndex (aListBox : TCustomListBox; aValue : integer); private public end; var Form1: TForm1; implementation {$R *.fmx} procedure TForm1.NoEventSetListBoxIndex (aListBox : TCustomListBox; aValue : integer); var eItemClickEvent: TItemClickEvent ; // also tried TCustomListBox.TItemClickEvent, same {<--[DCC Error] testlistboxerror1.pas(31): E2003 Undeclared identifier: 'TItemClickEvent ' } eGestureEvent : TGestureEvent; eTapEvent : TTapEvent; begin eItemClickEvent := aListBox.OnClick ; eGestureEvent := aListBox.OnGesture; eTapEvent := aListBox.OnTap; aListBox.OnClick := nil; aListBox.OnGesture := nil; aListBox.OnTap := nil; aListBox.Itemindex := aValue; aListBox.OnClick := eItemClickEvent ; aListBox.OnGesture := eGestureEvent; aListBox.OnTap := eTapEvent; end; procedure TForm1.Button1Tap(Sender: TObject; const Point: TPointF); begin NoEventSetListBoxIndex(ListBox1, 5); end; end.

In this case, FMX.Listbox is definately in the uses clause

Thanks. But still undeclared identifier TCustomListBox.TItemClickEvent

Is there any way to use the structure view to cause a tab on a ttabcontrol to become the active tab? Thank you

Thanks all! A wealth of knowledge here.

That's pretty much the question. Any way to show the user a list of fonts they have on the device, and apply it to something in your app?

Are there functions in Delphi to return complementary or triadic colors from a Talphacolor? I'm not even concerned about the alpha, so functions for Tcolor would work. As always, thanks in advance!

Thanks for this! My issue was some confusion with the various functions expecting colors in the 0..1 range and I was using 0..360. All sorted now, but I'm going to go read that reference material.

Had that problem too - your solution worked

Yes that's the first part. But that just gives you the same color in hsl. I need to be able to then find the complementary and triadic colors of this color.

Any way to assign a TSkAnimatedImage the animation in another TSkAnimatedImage? I want to switch the animation based on different conditions.