Jump to content

at3s

Members
  • Content Count

    68
  • Joined

  • Last visited

Community Reputation

4 Neutral

Technical Information

  • Delphi-Version
    Delphi 10.4 Sydney

Recent Profile Visitors

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

  1. at3s

    Custom button's style (TStyleContainer)

    Thanks, it's a solution.
  2. I'm trying to use some custom button's style looks like in screenshot. There is just added TRectangle (in blue) in back of other controls. But this stopped button pressing event hiring - when press on button, it does nothing. Where is my bad?
  3. Thank you for your respond. Permission request is before screen create procedure calling, so it's ok, thanks again.
  4. Yes, there is PermissionRequest in the code, but I did not provide it here. It executes before a screen showing. Your code works fine and it's more elegant and correct than my trick with the OnLocationChanged event, thanks for an answer.
  5. Ok. Somehow fixed using OnLocationChanged event.
  6. Yes, and a location finding works fine at the second and next times. When I did a trick with the repeat ... until + ShowMessage - after few times it found a location. But when I commented ShowMessage, it stopped to work at first execution. Weird behaviour.
  7. I have a screen with the: LocationSensor: TLocationSensor; And code: procedure Tfrm.FormCreate(Sender: TObject); begin LocationSensor.Active := True; end; procedure Tfrm.FormClose(Sender: TObject; var Action: TCloseAction); begin LocationSensor.Active := False; Action := TCloseAction.caFree; end; procedure ShowLocation(); var mapPosition: TMapCoordinate; begin frm := Tfrm.Create(Application); try mapPosition := TMapCoordinate.Create(frm.LocationSensor.Sensor.Latitude, frm.LocationSensor.Sensor.Longitude); ShowMessage(FloatToStr(frm.LocationSensor.Sensor.Latitude) + ' | ' + FloatToStr(frm.LocationSensor.Sensor.Longitude)); finally frm.Show; frm.BringToFront; end; end; When I call ShowLocation(); in Android 12, it returns 'NaN | NaN' first time, after that each calling returns correct coordinates. Is it a known issue or did I miss something?
  8. I will do as you mentioned, it sounds correct.
  9. Yes. Yes. But is there a way to move an application at least in background mode like [Home] iPhone hardware button does? Sure, the easest way will be to hide those [Exit] button from the application in case it doesn't work in iOS.
  10. Yup, I already found the source where it raises. So how close\hide iOS application using Delphi? I'm new with it.
  11. Delphi 11.2 patch 2. iOS application raises "EUnsupportedPlatformService with message 'Unsupported platform service: Terminate'" error upon Application.Terminate; or MainForm.Close; There is no problem with Android application. Actually it's [Exit] button functionality in the application. Can someone help?
  12. at3s

    OpenSSL fails to Load

    I'm using libssl.so v 1.0.2r in my project and there was not a problem with the Android migration from Delphi 10.4 to 11.2. Sure, there are files for Android32 and Android64.
  13. The problem fixed by installing the Patch 1 for Alexandria 11.2. RAD Studio 11.2 Alexandria Patch 1 Available (embarcadero.com)
  14. Unfortunately I got the same error when was trying to build an iOS application on "Apple M1" chip\processor. What is wrong with this? I noticed, when I run a Windows version of this application built in Delphi 11, it required midas.dll. It was not when an app was build in Delphi 10.4. iOS fault on libmidas.a. [DCC Error] E2597 ld: in c:\program files (x86)\embarcadero\studio\22.0\lib\iOSSimARM64\Release\libmidas.a(C:\Projects\Olympus\tp\intermediate\release\lib\midas\iosdevice64\alchemy.o), building for iOS Simulator, but linking in object file built for iOS, for architecture arm64 Just a notice.
  15. Well, sounds bad for me. Thanks for responds.
×