자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 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 15802
공지 유용한 관련 사이트 관리자2 2014.03.20 54604
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 98039
3259 Delphi 에서 NI scope 사용하기 양현숙 2012.03.09 5701
3258 XE2에서 FireMonkey인지 여부 판단 [1] 현자아빠 2012.03.13 6393
3257 XE2 이전버전에 비해서 좋아진 점은 무엇인가요??? [1] 델π 2012.03.19 5838
3256 RadPHP에서 질문 [3] 초딩개발자 2012.03.21 5764
3255 BDE -> DBExpress 변경중 에러 [2] 호달 2012.03.22 8728
3254 [질문] 문자열에 관한 두가지 질문 입니다... [2] 따라쟁이 2012.03.22 5199
3253 DB Express 를 이용한 방법 도움 요청 [1] file 준이킴 2012.03.22 5898
3252 델파이 관련해서 질문드려요 ~ [1] 구군v 2012.03.23 4866
3251 RAD XE2의 TChart 컴포넌트에서요 [1] 나도몰라 2012.03.26 6039
3250 DataSnap에서 암호화, 압축을 지원하나요? 관리자 2012.03.27 6351
3249 DBExpress 질문 입니다. [3] 호달 2012.03.28 6839
3248 DBgrid 버그인지 확인 부탁드립니다. file 준이킴 2012.03.28 4890
3247 아래 DBGrid 버그 문제 일정한 규칙이 있습니다. 준이킴 2012.03.28 5055
3246 RadPHP XE2 한글문제.. [5] file netmast 2012.03.29 6909
3245 DBGrid 버그 원인 찾았습니다. ^^ 버그 맞습니다. [1] 준이킴 2012.03.29 5598
3244 프로젝트옵션의 어플리케이션 아이콘 변경 방법 ? [2] file 준이킴 2012.03.29 13848
3243 DataSnap Server 사용시 msvcr80.dll 오류 [2] file 이치고 2012.03.31 13906
3242 다른언어의 도움말 사용 [2] 나도몰라 2012.03.31 10205
3241 MAC OSX 에서 Firemonkey SaveDialog 오류 (내용수정) [3] c2design 2012.04.02 12057
3240 TTouchKeyboard 질문입니다. [2] 나도몰라 2012.04.04 9777