자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 다른 분들도 참고할 수 있도록 결과 댓글 필수(또는 감사 댓글)
(결과 댓글을 달지 않는 경우 다음 질문에 대한 답변이 달리지 않는 불이익이 있을 수 있습니다.)
-----------------------------------------------------------------------------------------------

안녕하세요 

 

안드로이드 앱개발 새내기 입니다.

 

다름이 아니라 이번에 개발하는 어플에 한가지 문제점이 있어 문의 드립니다.

 

델파이 10.2 도쿄버전으로 개발중입니다.

서버와 스마트폰어플로 TCP/IP 통신을 하는게 주된 어플리케이션입니다.

근데 안드로이드5 이상 버전에서는 스마트폰의 홈버튼으로 어플을 감춰놓으면 3~4분후에 종료됩니다.

종료와 동시에 TCP/IP 커넥션이 끊기게 되어 개발된 앱을 사용할수가 없는 상황입니다.

 

구글검색으로 한가지 방법을 찾아 StartForegroundService라는 안드로이드 서비스를 찾아냈지만,

델파이로 사용된 정확한 예시소스를 찾을수 없어 계속 실패하고 있습니다.

 

혹시 자바가 아닌 델파이로 구현된 StartForeground 기능을 알고계시다면 도움을 주시길 부탁드립니다.

 

구글검색으로 찾았던 소스도 같이 올려드립니다.

 

type
  TGeneratorUniqueID = class
  const
    SETTINGS_NOTIFICATION_UNIQUE_ID = 'SETTINGS_NOTIFICATION_UNIQUE_ID2';
  strict private
    class var FNextUniqueID: Int64;
  public
    class constructor Create;
    class function GenerateID: Integer;
  end;

const
  FMX_NOTIFICATION_CENTER = 'FMX_NOTIFICATION_CENTER2';

class constructor TGeneratorUniqueID.Create;
var
  Preference: JSharedPreferences;
begin
  Preference := SharedActivity.getSharedPreferences(StringToJString(FMX_NOTIFICATION_CENTER), TJContext.JavaClass.MODE_PRIVATE);
  FNextUniqueID := Preference.getInt(StringToJString(SETTINGS_NOTIFICATION_UNIQUE_ID), 0);
end;

class function TGeneratorUniqueID.GenerateID: Integer;
var
  PreferenceEditor: JSharedPreferences_Editor;
  Preference: JSharedPreferences;
begin
  Preference := SharedActivity.getPreferences(TJContext.JavaClass.MODE_PRIVATE);
  PreferenceEditor := Preference.edit;
  try
    PreferenceEditor.putInt(StringToJString(SETTINGS_NOTIFICATION_UNIQUE_ID), FNextUniqueID);
  finally
    PreferenceEditor.commit;
  end;
  Result := FNextUniqueID;
  Inc(FNextUniqueID);
end;

//* My code
procedure TFormMain.SetForeground;
var
    Service: JService;
    notification: JNotification;
    NotificationCompat_Builder: JNotificationCompat_Builder;
    Intent: JIntent;
begin
    NotificationCompat_Builder := TJNotificationCompat_Builder.Create;
    NotificationCompat_Builder := NotificationCompat_Builder.setSmallIcon(SharedActivityContext.getApplicationInfo.icon);
    NotificationCompat_Builder := NotificationCompat_Builder.setContentTitle(StrToJCharSequence(GetApplicationTitle));
    NotificationCompat_Builder := NotificationCompat_Builder.setContentText(StrToJCharSequence('Body'));

    notification := NotificationCompat_Builder.build;

    Intent := TJIntent.Create;
    Intent.setClass(SharedActivityContext, SharedActivityContext.getClass);
    Intent.setFlags(TJIntent.JavaClass.FLAG_ACTIVITY_SINGLE_TOP or TJIntent.JavaClass.FLAG_ACTIVITY_CLEAR_TOP);
    Intent.setAction(TJFMXNotificationAlarm.JavaClass.ACTION_FMX_NOTIFICATION);

    notification.setLatestEventInfo(MainActivity.getApplicationContext, StrToJCharSequence('Title'), StrToJCharSequence('Text'), TJPendingIntent.JavaClass.getActivity(SharedActivityContext, TGeneratorUniqueID.GenerateID, Intent, 0));

    Service.startForeground(1, notification);
end;

출처 : http://codeverge.com/embarcadero.delphi.firemonkey/help-with-android-firemonkey-st/1058681

 

노란색으로 표시한 부분에 [TJFMXNotificationAlarm]  은 어떤 라이브러리를 Uses 해야되는지 찾지못해 

주석처리하고 사용해보았지만 실패했습니다.

 

참고될만한 조언 부탁드립니다.

감사합니다.

번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 17255
공지 유용한 관련 사이트 관리자2 2014.03.20 56154
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99578
433 VB구조체를 받는 문법 질문 드립니다. [2] 초보델팡이 2019.08.20 175
432 TBluetoothLE 예제관련 도움 부탁드립니다. ray 2019.08.20 144
431 델파이 10.2버젼 VCL컴포넌트 익명메소드 구현에 관하여 [1] 에크토바 2019.08.21 189
430 처음보는 현상 폼 크기가 작아지면서 전체적으로 작아짐 써치 2019.08.22 215
429 DBGRID 질문 드립니다. [2] 초보델팡이 2019.08.23 407
428 Delphi 10.2 사용자 정의 컴포넌트 등록후 디자인타임에 안보임 file 미스터몽키 2019.08.23 337
427 이메일 질문입니다. [2] 희망나라 2019.08.26 404
426 ems서버 에서 post관련 종결자 2019.08.26 196
425 FMX 멀티스레드 문제입니다. [4] file 아크나톤 2019.08.28 836
424 dbx error ORALCE11g RAD 10.3.2 버전에러입니다. (평가판 문제입니다 ) [1] file 강순규 2019.08.30 258
423 10.3.2 Webbrowser 버그인가요? (iOS) file 돌팅 2019.08.31 200
422 IOS 앱실행관련 문의사항입니다. ( 시뮬레이터 관련 ) [2] 궁금한사람 2019.09.02 261
421 델파이 기본 글꼴을 변경하는 방법이 궁금합니다. [4] 맛재현 2019.09.04 869
420 Delphi 10.3 rio 에서 10.2에서 잘되었던 내 전화번호 가져오기가 안됩니다. [2] 델파이_사랑 2019.09.05 13002
419 dephi 10.2 에서는 10.3 rio버전으로 변경후 은행때문에 시스템이 느려지는 문제 델파이_사랑 2019.09.06 191
418 IOS 앱실행관련 문의사항입니다. ( 디바이스 연결 관련 ) [2] 궁금한사람 2019.09.06 282
417 FireDAC 를 이용한 DB 접속( MSSQL ) [2] 천재일 2019.09.06 1949
416 RAD Server 에서 간단한 get을 하는데 에러가 나는데 원인을 모르겠어요. [4] 종결자 2019.09.08 229
415 IOS 앱실행관련 문의사항입니다. ( 디바이스 연결 관련 2번째) [2] 궁금한사람 2019.09.10 146
414 ExportGridToXLSX 사용시 특수문자처리 [1] 가나다 2019.09.17 1944