Forum: Cross-Platform-Entwicklung
Delphi
by QuickAndDirty,
3. Mai 2024, 14:25
Das ist eine Klasse in meiner Anwendung.
TAppForm ist das Main-Formular der APP
procedure TAppForm.FormCreate(Sender: TObject);
ist der prozedur kopf eines OnFormCreate Ereignisses auf dem MainFormular.
//Intercept LifeCycleEvents
var aFMXApplicationEventService:IFMXApplicationEventService
Forum: Cross-Platform-Entwicklung
Delphi
by QuickAndDirty,
29. Feb 2024
Du musst die Livecycle Events deiner App berücksichtigen!
procedure TAppForm.FormCreate(Sender: TObject);
Begin
//Intercept LifeCycleEvents
var aFMXApplicationEventService:IFMXApplicationEventService
if TPlatformServices.Current.SupportsPlatformService(IFMXApplicationEventService, IInterface(aFMXApplicationEventService) ) then
...