SMS Sender – Automate Your SMS Discover SMS Sender! Tired of manually sending SMS for your personal or business needs? SMS Sender is the solution for you! With SMS Sender, you can easily automate SMS sending through its integrated web server. A single REST call is all you need to send messages quickly and efficiently.…
Read more
Environment: Delphi 11.1 ( used from Delphi XE 10) Android 12 32bit/64bit supported from Android 9 but work with Android 6.0 too In many cases it may be necessary to access HTTP content on the network where SSL is not available for example: A server within your local network, on a VPN You have an…
Read more
Goals: Integrate Firebase push notifications (FCM) into an app built with Delphi for iOS without the help of third-party libraries. Having the same base code in the application and in the servers for managing pushes in Delphi the same as that used for Android. Test environment used: VM Delphi 11 Alexandria Ent. Edition on…
Read more
RAD Studio 11 Alexandria push notification with Android via Firebase. Targets: 1 – Receive push notifications on my Android app 2 – Have a server system for sending push notifications Assumptions from which I started for this test: 1 – Have a Google Firebase account: https://console.firebase.google.com/ 2 – Have an app published on the…
Read more
To detect device orientation change, you can use the following example:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 |
uses System.Messaging, FMX.Platform; var FId: Integer; // Subscribe to TOrientationChangedMessage FId := TMessageManager.DefaultManager.SubscribeToMessage(TOrientationChangedMessage, DoOrientationChanged); // Write orientation change handler: procedure TMyForm.DoOrientationChanged(const Sender: TObject; const M: TMessage); var s: IFMXScreenService; begin if TPlatformServices.Current.SupportsPlatformService(IFMXScreenService, s) then begin case s.GetScreenOrientation of TScreenOrientation.Portrait: ; TScreenOrientation.Landscape: ; TScreenOrientation.InvertedPortrait: ; TScreenOrientation.InvertedLandscape: ; end; end; end; // Unsubscribe the TOrientationChangedMessage TMessageManager.DefaultManager.Unsubscribe(TOrientationChangedMessage, FId); |
