Jump to content

Fudley

Members
  • Content Count

    78
  • Joined

  • Last visited

Community Reputation

8 Neutral

Technical Information

  • Delphi-Version
    Delphi 11 Alexandria

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Fudley

    Updating files in assets\internal\ (12, FMX, Android)

    I tried "-doallmywork"but no effect.
  2. Fudley

    Updating files in assets\internal\ (12, FMX, Android)

    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!
  3. 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?
  4. 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;
  5. 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
  6. Serge_G Thanks so much! that worked perfectly!!!!
  7. 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
  8. Fudley

    TForm to TForm communication

    Wow thanks so much that worked perfectly!
  9. Fudley

    TForm to TForm communication

    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.
  10. Fudley

    TForm to TForm communication

    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?)
  11. Fudley

    Any *new* controls added, events do not trigger

    Well FM, it happened again today. Anyone have any clues please? Reinstall Delphi?
  12. Thanks Remy that's a great resource. Link saved for reference.
  13. Fudley

    Any *new* controls added, events do not trigger

    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.
  14. Fudley

    Any *new* controls added, events do not trigger

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

    Any *new* controls added, events do not trigger

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