Android - Synaptica srl

Delphi HTTP Clear Text Traffic on FMX Android

by Ivan Revelli
in Delphi
on April 20, 2022

0

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

Delphi 11 – Firebase Cloud Messaging ( FCM ) – iOS app Push Notification

by Ivan Revelli
in Apple iOS, Posts, Posts, Posts, Posts, Posts
on March 24, 2022

0

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

Delphi 11 – Firebase Cloud Messaging ( FCM ) – Android Push Notification

by Ivan Revelli
in Android, Android, Android, Android, Android, Android
on March 14, 2022

0

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

Detect device orientation change Delphi Firemonkey

by Ivan Revelli
in Delphi, Delphi, Delphi, Delphi, Delphi, Posts, Programmazione, Programmazione
on July 28, 2021

0

To detect device orientation change, you can use the following example:

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);

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;

// Unsubscribe the TOrientationChangedMessage

TMessageManager.DefaultManager.Unsubscribe(TOrientationChangedMessage, FId);

Xtumble4Delphi – not a simple API framework

by Ivan Revelli
in Apple iOS, Programmazione, Xtumble
on December 28, 2020

0

Xtumble library for Delphi Xtumble4Delphi is native delphi library, cross platform ( Windows, Android, iOS, macOSX, Linux64) that allow you to integrate all cloud functonalitty of the XTumble platform in your application. If you create an XTumble Account you can have a dedicated ERP, e-commerce, Cluod Drive, CRM Mail with SMTP and POS system in the cluod. Creating an…
Read more

Android App Version with Delphi

by Ivan Revelli
in Uncategorized
on November 8, 2017

0

Using the JPackageInfo class is simple to retrive the version of your Android application. This class is already wrapped by Embarcadero in the following unit: Androidapi.JNI.GraphicsContentViewText {code} {$IFDEF ANDROID} var PackageManager: JPackageManager; PackageInfo: JPackageInfo; begin PackageManager := SharedActivityContext.getPackageManager; PackageInfo := PackageManager.getPackageInfo (SharedActivityContext.getPackageName, 0); result := JStringToString(PackageInfo.versionName); End; {$ENDIF}

Category: Android