자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다.
- 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)
Delphi [질문] 안드로이드몬의 효과음 실행은요?
2016.12.27 17:01
본 게시판 사용시 당부 사항
* 이 게시판은 자유롭게 질문을 올리고 자발적으로 답변을 공유하는 게시판입니다.
* 어느 누구도 답변을 달아야만 하는 책임은 없습니다.
* 따라서 질문을 올리실 때에는 최대한 자세하고 정중하게 질문을 올려 주세요.
* 최대한 질문을 자세히 올려야 답변도 자세히 올라 옵니다.
* 본 질문에 답변을 주시는 여러 개발자님들께 미리 감사드립니다.
-----------------------------------------------------------------------------------------------
XE7, Firemonkey로 안드로이드 앱을 개발중입니다.
질문 : 프로그램에서 잘목된 항목을 선택시 경고음을 발생하려합니다.
배포시 Depoyment된 파일(mp3)은 어떻게 실행하나요?
ex) if edit1.text ='' then
경고음발생 else
경고음발생2 ;
Deployment 의
Type : File
Paltforms : [Android]
Remotepath : .\assets\internal\
Remote Status : Not Connected
Overwrite : Always
입니다
어떻게 Deploy한 경고음을 실행하나요?
Delphi [질문] 안드로이드몬의 효과음 실행은요?
2016.12.27 17:01
본 게시판 사용시 당부 사항
* 이 게시판은 자유롭게 질문을 올리고 자발적으로 답변을 공유하는 게시판입니다.
* 어느 누구도 답변을 달아야만 하는 책임은 없습니다.
* 따라서 질문을 올리실 때에는 최대한 자세하고 정중하게 질문을 올려 주세요.
* 최대한 질문을 자세히 올려야 답변도 자세히 올라 옵니다.
* 본 질문에 답변을 주시는 여러 개발자님들께 미리 감사드립니다.
-----------------------------------------------------------------------------------------------
XE7, Firemonkey로 안드로이드 앱을 개발중입니다.
질문 : 프로그램에서 잘목된 항목을 선택시 경고음을 발생하려합니다.
배포시 Depoyment된 파일(mp3)은 어떻게 실행하나요?
ex) if edit1.text ='' then
경고음발생 else
경고음발생2 ;
Deployment 의
Type : File
Paltforms : [Android]
Remotepath : .\assets\internal\
Remote Status : Not Connected
Overwrite : Always
입니다
어떻게 Deploy한 경고음을 실행하나요?
// 저는 아래와 같이 해서 음악을 듣고 있습니다.... 앱 내에서....
// 참고해서 적용해 보시기 바랍니다.
// TMediaPlayer 콤포넌트를 배치한 후,
uses FMX.Media, System.IOUtils;
procedure TMainF.Button1Click(Sender: TObject);
var
TmpFile, song: string;
begin
TmpFile := IncludeTrailingPathDelimiter(TPath.GetDocumentsPath); // internal
// 이런 파일들은 굳이 internal(Sandbox)영역에 넣을 필요는 없을 듯합니다..
// 아래는 폰을 PC에 연결하면 탐색기에서 컴퓨터\폰기기명\Phone\Documents를 폴더를 가르키는데
// 이 경로는 탐색기에 바로 나오니 추가/삭제가 아주 자유롭겠지요....
// 만약 보안이 필요한 파일 또는 데이타라면 Sandbox영역에 두는 것이 맞겠지요..
// 그리고 리소스로 apk내에 내장 시킬 수도 있겠구요...
// 사용방법은 다양하니.....
// TPath 클래스는 이 경로말고도 다양한 경로를 얻어 올 수 있습니다..
// TmpFile := IncludeTrailingPathDelimiter(TPath.GetSharedDocumentsPath);
song := TPath.Combine(TmpFile, 'mysong.mp3');
MediaPlayer1.FileName := song;
MediaPlayer1.Play;
end;