delphi - 使用 Delphi 的 TAPI 拨打电话

Question

我需要使用 Delphi 2006 中的 TAPI 发起呼叫。我希望它尽可能简单。对简单组件有什么建议吗？是在绝地吗？

Answer 1

你可以使用TurboPower Async Professional，前段时间我使用了这个库并且运行良好，你可以在这个链接中找到更多关于 tapi 和 AsyncPro 组件的信息。

Answer 2

这是组件列表一些免费软件一些共享软件

http://www.torry.net/pages.php?id=199

谢谢

Answer 3

要使用 Tapi 和 delphi，您只需要两件事。

一种。导入 dll 并创建 tlb 文件。在 delphi 菜单中，转到组件，然后选择导入组件，然后选择导入类型库，键入“tapi3”并选择tapi3.dll。

湾。使用创建的 dll 拨打电话，您需要使用简单的

procedure TForm1.Button1Click(Sender: TObject);
var
  Request:ITRequest;
  dispatch:ITDispatchMapper;
begin
  Request := CoRequestMakeCall.create;
  Request.MakeCall('555-5555','Tag','client name','Comment');
end;

并将“555-5555”替换为用户输入的文件号，作为字符串。

Answer 4

在implementation

function tapiRequestMakeCallW(DestAddress: PWideChar; AppName: PWideChar;
  CalledParty: PWideChar; Comment: PWideChar): LongInt; stdcall;
external 'TAPI32.DLL';

在那个电话tapiRequestMakeCallw之后

TapiSonuc:=tapiRequestMakeCallw(Phone,'', comment, Comment);