我正在使用Delphi的网络共享将FMX Android应用程序连接到VCL桌面应用程序。
当用户关闭手机上的Android应用时,我希望桌面显示它不再受限制。
我使用以下内容:
procedure TMainForm.FormClose(Sender: TObject; var Action: TCloseAction);
var
I: Integer;
begin
for I := TetheringManager1.PairedManagers.Count - 1 downto 0 do
TetheringManager1.UnPairManager(TetheringManager1.PairedManagers[I]);
end;
procedure TMainForm.FormDestroy(Sender: TObject);
begin
TetheringAppProfile1.Enabled:=False;
TetheringManager1.Enabled:=False;
end;
只要用户使用后退按钮关闭Android应用,这就完美无缺。如果你转到打开的应用程序列表并从那里关闭应用程序,那么根本没有任何事情发生。
尝试过FormClose,FormDestroy,FormDeactivate似乎没有发生任何事件。
德尔福10柏林 Android 6.0.1