

Fudley
Members-
Content Count
78 -
Joined
-
Last visited
Community Reputation
8 NeutralTechnical Information
-
Delphi-Version
Delphi 11 Alexandria
Recent Profile Visitors
The recent visitors block is disabled and is not being shown to other users.
-
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!
-
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?
-
How to find the currently used theme color of a themed control
Fudley replied to Fudley's topic in FMX
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; -
How to find the currently used theme color of a themed control
Fudley replied to Fudley's topic in FMX
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 -
How to find the currently used theme color of a themed control
Fudley replied to Fudley's topic in FMX
Serge_G Thanks so much! that worked perfectly!!!! -
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
-
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.
-
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?)
-
Well FM, it happened again today. Anyone have any clues please? Reinstall Delphi?
-
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...