1、建立如下form：
2、在各按鈕的click事件中，分別寫入如下**：
procedure tform1.button1click(sender: tobject);
begin
//埠可直接設定，例如埠為usb，port:='usb'
if telecomport1.setupport then
memo1.lines.add('port='+telecomport1.port);
end;
procedure tform1.button2click(sender: tobject);
begin
telecomport1.open;
if telecomport1.jdusbdevcount>0 then
memo1.lines.add(inttostr(telecomport1.jdusbdevcount)+' usb裝置');
end;
procedure tform1.button3click(sender: tobject);
begin
telecomport1.close;
end;
3、在telecomport1的open、close、read事件中，分別寫入如下**：
procedure tform1.telecomport1open(sender: tobject);
begin
if telecomport1.jdconnected then begin
memo1.lines.add('connected '+inttostr(telecomport1.jdusbdevcount));
//開啟埠時讀取來電管理器內快取的號碼
telecomport1.readallwhenopen;
end;
end;
procedure tform1.telecomport1close(sender: tobject);
begin
if not telecomport1.jdconnected then
memo1.lines.add('not connected')
else
memo1.lines.add('connected '+inttostr(telecomport1.jdusbdevcount));
end;
//有來電時啟用此事件
//s為來電號碼，t為來電時間，devid為usb的裝置號
procedure tform1.telecomport1read(sender: tobject; s: string; t: tdatetime;
devid: string);
begin
memo1.lines.add(s+formatdatetime(' yyyy-mm-dd hh:nn:ss', t));
end;
就這麼簡單。
當然需要使用高深公司的「記得」來電顯示管理器，詳情請參考：http://www.kosen.com.cn/jdmain.htm
用PowerBuilder開發來電顯示軟體
用powerbuilder開發來電顯示軟體 是企業與使用者聯絡的主要方式,怎樣快速的得到使用者的資訊並與企業自身的管理系統結合起來.目前常用的有 兩種方式 一是採用 語音卡,二是採用usb介面的來電顯示接收盒.由於語音卡本身 比較貴,使用也不方便,本文 採用usb來電顯示盒來實現.usb來電顯示 盒...
硬體介面開發之Modem來電顯示
本文介紹下如何實現modem的來電顯示的功能。modem的來電顯示是在我最早的送水管理軟體中實現的，大概是05年完成的，由於modem的成本比較低 普通的在100元之內 而來電顯示功能在送水管理軟體中比較需要，因此是一項價效比比較好的功能。隨著時間的推移，modem的生產越來越少，而支援來電顯示模組...
別讓「來電顯示費」變成「呼吸稅」
自從 2002 年開始收取 來電顯示費 以外，客戶關於這項費用的意見和不滿就沒有平息過，前不久還有法律碩士狀告移動收 6元來電顯示費。收取來電顯示費顯然是合法的。收取來電顯示費是國家規定允許的，2000 年國家乙份檔案 關於調整部分移動 資費的通知 規定 移動 主叫號碼顯示功能收費的上限是每月 10...