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 := TCloseAct...