Fudley

Odd question (ok, so no change then ) It seems in order to update any files I'm deploying to the assets\internal\ folder I have to do the following: -on the android device, app storage, I do "clear cache", "clear data" and then "uninstall" -in D12, delete the files in question from deployment -in D12, add them back to deployment, setting the remote path to assets\internal\ ....build, run and Bobs your uncle Do I really need all these steps? Can this be streamlined at all?

I tried "-doallmywork"but no effect.

Todd thanks so much that works like a charm! And just a general big thanks to everyone here who is so very helpful to an old dbase-foxpro-clipper-delphi-windows programmer!

A number of controls are not themed, like TRectangle, TLine and the svg.overridecolor on TkSvg. I would like to set these to match the current theme. How can I find the currently used theme color of a control I know is themed, so I can then apply it to the non-themed controls at runtime? For instance TLabel themed fontcolor would do nicely to use for svg.overridecolor on TkSvg,. TLabel themed fontcolor would work (for me) for TRectangle.stroke TButtons themed fill color could be used for TRectangle.fill For me, this would save oodles of work. thanks all

I found this does not effect embedded TFrames, so I wrote a frame-specific TMyMainForm.ColorMyFramesWorld(aFrame:TFrame_) that does essentailly the same thing with the children of the frame. TMyMainForm.ColorMyWorld;

With serge_g's help: procedure TMyMainForm.ColorMyWorld; var ThisComp : TComponent; iComponentCount, iThis : integer; TextObj : TText; begin // gotstylelabel is a TLabel TextObj := TText(gotstylelabel.FindStyleResource('text')); if Assigned(TextObj) then begin iComponentCount := ComponentCount; {form componentcount} try for iThis := 0 to iComponentCount-1 do begin ThisComp := Components[iThis]; if ThisComp is TRectangle then TRectangle(ThisComp).Stroke.color := TextObj.Color else if ThisComp is TLine then TLine(ThisComp).Stroke.color := TextObj.Color else if ThisComp is TskSVG then TskSVG(ThisComp).svg.overrideColor := TextObj.Color ; end; except end; end; end

delphi 12, fmx, android What is a simple technique for sending communications from one TForm to another TForm? (other than filling a hidden label or clicking a hidden button on the target form maybe?)

Serge_G Thanks so much! that worked perfectly!!!!

Wow thanks so much that worked perfectly!

That looks promising Rollo62. Say I want FormB to send an integer message to FormA i.e. 999 and have FormB receive and perform the instruction represented by 999. i.e. case integer-message of 1: 2: 3: 99: perform task 99 end How would I set up it up. I am still confused by the TMessageManager subscribe and unsubsribe, and how to send message from one to the other.

This just started happening, and I can't figure out what changed. All existing controls on the form respond to OnTap events as usual. If I add a new control to the form, such as a button or label, its OnTap event does not fire. For instance, if I drop a button (Button9) on the form, and assign its OnTap event as follows, nothing happens when I tap it. procedure TFudleyMain.Button9Tap(Sender: TObject; const Point: TPointF); begin showmessage('HERE'); end; Anyone ever experience this?

Well FM, it happened again today. Anyone have any clues please? Reinstall Delphi?

What I am doing to load a .style file from disk: if FileExists(SelectedStyleFile) then begin Application.mainform.stylebook.LoadFromFile(SelectedStyleFile) ; end; How do I then apply the style?

D12, Android 14 I have added a file to the deployment tab. Local name is abc.xyz Remote path is set as assets\internal , remote name is abc.xyz How do I load this file at runtime? I can't find it with FileExists function. I've tried variations of the TPath.Get* path functions i.e. FileExists( tpath.combine(TPath.GetAppPath,'abc.xyz) ); Basically , how do I locate the file deployed to assets\internal at runtime

Thanks Remy that's a great resource. Link saved for reference.

I had to revert back to an earlier version and manually redo the changes one by one since then. I still don't know how or why it happened.

Well I tried on Android 12 and 14 - same problem. Scratching head...

Sorry - Delphi 12, Windows 11. However my test phone did upgrade to Android 15 today...

Yes! Thank you very much Dave. I am constantly amazed at your knowledge.

I need to get a cheap tablet for testing. -Needs to work with Windows 11. and Delphi 12. -Preferably under $150. Any recommendations?

To follow up, I was able to get a 7 inch and 10 inch for testing. Glad I did! Have to adjust a few things

Hi François , I am so sorry I really messed up that description! - We are developing apps for Android, using Delphi 12, on Windows 11. - We need an Android tablet to be used only for testing the android apps. (and possibly as a Kindle alternative 📓) - We want to spend under $150 if possible (OK if it is used or reconditioned) -I am used to Samsung, so that would be a plus I hope that is more lucid. Thanks!

Say I have a TRectangle, and inside of it I have 5 TRectangles, and all are align=top. How do I then change the order or them at design time? I've been using: copy all to clipboard, paste to a text editor, delete on the form, and then paste back in one at a time. Is there a better way?

Thanks dave

Delphi 12.1 Assigning a TDateEdit.Date causes a calendar to popup on android. For instance simply MyDateEdit.Date := Today; Is this by design, and how do I prevent it?