Firemonkey [Android] 폰번호 가져오기
2014.09.05 01:48
스마트폰 전화번호 가져 옵니다. (전화번호부 아닙니다)
다른 사이트에 거의 동일한 팁이 올라 왔습니다. 아무거나 상관 없습니다.
uses
{$IFDEF Android}
,FMX.Platform.Android
,FMX.Helpers.Android
,Androidapi.JNI.Telephony
,Androidapi.JNI.GraphicsContentViewText
,Androidapi.JNIBridge
,Androidapi.Helpers
{$ENDIF}
.....................
function DoGetPhoneNumber: string;
var
sTemp: string;
nPos: integer;
{$IFDEF Android}
tMgr: JTelephonyManager;
{$ENDIF}
begin
integer(Result) := 0;
{$IFDEF Android}
tMgr := TJTelephonyManager.Wrap((SharedActivityContext.getSystemService(TJContext.JavaClass.TELEPHONY_SERVICE)
as ILocalObject).GetObjectID);
sTemp := JStringToString(tMgr.getLine1Number);
nPos := Pos('10', sTemp);
if nPos > 0 then
Result := '0' + Copy(sTemp, nPos, MaxInt)
else
Result := sTemp;
{$ENDIF}
end;
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
공지 | [DelphiCon 요약] 코드사이트 로깅 실전 활용 기법 (Real-world CodeSite Logging Techniques) | 관리자 | 2021.01.19 | 15443 |
공지 | [UX Summit 요약] 오른쪽 클릭은 옳다 (Right Click is Right) | 관리자 | 2020.11.16 | 13962 |
공지 | [10.4 시드니] What's NEW! 신기능 자세히 보기 | 관리자 | 2020.05.27 | 16499 |
공지 | RAD스튜디오(델파이,C++빌더) - 고객 사례 목록 | 관리자 | 2018.10.23 | 22055 |
공지 | [데브기어 컨설팅] 모바일 앱 & 업그레이드 마이그레이션 [1] | 관리자 | 2017.02.06 | 23268 |
공지 | [전체 목록] 이 달의 기술자료 & 기술레터 | 관리자 | 2017.02.06 | 18923 |
공지 | RAD스튜디오(델파이, C++빌더) - 시작하기 [1] | 관리자 | 2015.06.30 | 39259 |
공지 | RAD스튜디오(델파이,C++빌더) - 모바일 앱 개발 사례 (2020년 11월 업데이트 됨) | 험프리 | 2014.01.16 | 174726 |
3 | Delphi / C ++ Builder를 사용하여 Azure에서 MSSQL 데이터베이스 만들기 및 연결 | 험프리 | 2020.02.03 | 214 |
2 | 3회차 "커뮤니케이션 데이 - 마이그레이션" 회고 | 험프리 | 2020.02.05 | 194 |
1 | [코드레이지2019] VCL 현대화: WinAPI, COM & Shell 인터페이스, WinRT 통합하기 | 김원경 | 2020.01.30 | 187 |
선생님, 고맙습니다.
뭐라고 감사해야 할지..
지금까지 꽤나 쓴 맛, 단 맛을 보면서 엠박카드로 개발팀들이 정말 최고라는 생각을 그칠 수 없군요.
밤에 잠도 안오네요. 코딩상상하느라고 ^^
이 나이에 시애틀의 잠 못 이루는 밤입니다 ^^