如题,主要是想通过Modem实现语音通讯的功能,怎么调用Windows里面的拨号软件呢?

解决方案 »

  1.   

    Function tapiRequestMakeCall(DestAddress, AppName,
      CalledParty, Comment: PChar): Longint; stdcall; external 'TAPI32.DLL';
    Function OpenDiali(PhoneNumber: String): Longint;
    Var
      AppName: Array[0..255] Of Char;
    Begin
      //  Showmessage(PhoneNumber);
      StrPCopy(AppName, Application.Title);
      Result := tapiRequestMakeCall(PChar(PhoneNumber), AppName, '', '');
    End;