全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1150
推到 Plurk!
推到 Facebook!

FireMonkey讀取手機通訊錄的功能

答題得分者是:老大仔
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#1 引用回覆 回覆 發表時間:2017-02-06 14:51:43 IP:59.120.xxx.xxx 未訂閱
請問各位:

有沒有參考範例, 可以利用 FM2 讀取手機通訊錄, 連絡人及 sim卡上電話名單的設計
在Android 與 IOS 是否都有辦法可達成?
又如果可以, 有沒有什麼 OS 版本的限制?

謝謝!
老大仔
尊榮會員


發表:78
回覆:837
積分:1088
註冊:2006-07-06

發送簡訊給我
#2 引用回覆 回覆 發表時間:2017-02-06 16:46:39 IP:210.61.xxx.xxx 未訂閱
不知道以下連結有沒有符合PD大的需求?
https://community.embarcadero.com/blogs/entry/using-taddressbook-to-create-access-and-manage-contacts

===================引 用 P.D. 文 章===================
請問各位:

有沒有參考範例, 可以利用 FM2 讀取手機通訊錄, 連絡人及 sim卡上電話名單的設計
在Android 與 IOS 是否都有辦法可達成?
又如果可以, 有沒有什麼 OS 版本的限制?

謝謝!
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#3 引用回覆 回覆 發表時間:2017-02-06 22:08:43 IP:118.169.xxx.xxx 未訂閱
感謝老大仔提供的鏈結, 要下載測試後才知道是不是我想要做到的東東

P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#4 引用回覆 回覆 發表時間:2017-02-07 00:08:06 IP:118.169.xxx.xxx 未訂閱
剛剛run了這支demo, 結果直接閃退給我看

環境
RadStudio XE10.1 Berlin Update2 Win7 Android 6.0 OS
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#5 引用回覆 回覆 發表時間:2017-02-11 12:29:02 IP:118.169.xxx.xxx 未訂閱
我找到了在以下路徑有一支 embd 原始提供的範本
C:\Users\Public\Documents\Embarcadero\Studio\18.0\Samples\Object Pascal\Multi-Device Samples\Device Sensors and Services\Address Book\Contacts

可以正常運作, 但很奇怪的是, 我的手機中的連絡人有數十位, 但透過這支程式所讀到的只有出現3位, 不知道程式到底讀到的是那裡的連絡人?
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#6 引用回覆 回覆 發表時間:2017-03-12 17:11:21 IP:118.160.xxx.xxx 未訂閱
經過好多天天天天天天的研究, 發現sample中的程式, 有點無法令人瞭解

procedure TForm1.ActionRefreshExecute(Sender: TObject);
begin
FDefaultSource := AddressBook1.DefaultSource;
FillGroupList(FDefaultSource);
FillContactList(FDefaultSource);
end;

上面這段是最主要取得連絡人的程式, 透過這段會取得我所提到的Google 帳戶的連絡人(3位), 因為 FDefaultSoruce 指定了 AddressBook1.DefaultSource,
我嘗試把 FDefaultSource := AddressBook1.DefaultSource --> mark 掉
就可以拿到全部的電話, 但我卻無法知道那一組連絡人是sim卡的還是 連絡人的, 還是其他的...
翻查了很多文獻及提供的 sourcecode, 發現 FDefaultSoruce 為 nil時就會取到全部, 但如果硬要指定 FDefaoutSoruce 是那一個 SourceID時, 就完全取不得, 至此實在不知如何進行下去...
再研究看看吧!
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#7 引用回覆 回覆 發表時間:2017-03-14 12:12:00 IP:118.160.xxx.xxx 未訂閱
使用 Contact.Source.SourceName 可取得(在htc手機上) pcsc 或 SIM 的識別, 沒魚蝦也好, 雖然我無法得知非SIM卡來源是屬那一種, 至少我可以知道區分SIM卡來源, 如果還有再找到更好的解決方法, 再與各位分享!
系統時間:2024-03-28 20:50:21
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!