电话语音盒函数，用易语言开发，其中有些函数的参数不知该设置什么

procedure TForm1Timer3Timer(Sender: TObject);

var

cidTime1,cidNo1,cidName1:Pchar; // [16] [32] [32]

cidTime2,cidNo2,cidName2:pchar; // [16] [32] [32]

begin

cidTime1:=StrAlloc(16);

cidNo1:=StrAlloc(32);

cidName1:=StrAlloc(32);

cidTime2:=StrAlloc(16);

cidNo2:=StrAlloc(32);

cidName2:=StrAlloc(32);

if LT_GetCallerIDStr(0,cidTime1,cidNo1,cidName1) then

begin

Form1Memo1LinesAdd('第1路收来电时间');

LT_ResetCallerIDBuffer(0);

Form1Memo1LinesAdd('第1路收来电时间'+cidTime1);

Form1Memo1LinesAdd('第1路收来电号码'+cidNo1);

Form1Memo1LinesAdd('第1路收来电姓名'+cidName1);

源码：

窗口的布局按照你说的做。。然后还要在底下加个标签3显示状态用。

版本

2

支持库

internet

支持库

spec

程序集

窗口程序集1

子程序

__启动窗口_创建完毕

编辑框1内容

＝

取用户帐号

(取拨号连接数

()

－

1)

编辑框1起始选择位置

＝

-1

编辑框1被选择字符数

＝

-1

编辑框1获取焦点

()

子程序

_按钮1_被单击

局部变量

i,

整数型

局部变量

k,

文本型

k

＝

取拨号连接名称

(1,

)

挂断拨号

(i,

k)

子程序

_按钮2_被单击

调试输出

(拨号

(“@0”,

编辑框1内容,

编辑框2内容,

,

标签3))

子程序

挂断拨号,

逻辑型,

公开,

挂断当前拨号网络连接

参数

连接句柄,

整数型,

,

由开始拨号返回的连接句柄

参数

连接名称,

文本型

如果

(API_RasHangUp

(连接句柄)

＝

0)

返回

(真)

否则

返回

(运行

(“rasphone

-h

”

＋

连接名称,

假,

#隐藏窗口))

如果结束

子程序

取拨号连接名称,

文本型,

公开,

取出系统中拨号连接名称

参数

拨号连接索引,

整数型,

,

值只能在1至10

参数

取所有名称,

文本型,

参考

可空

数组

局部变量

EntryName,

RASENTRYNAME,

,

"10",

假设最多10个连接

局部变量

lpcb,

整数型,

,

,

电话本名称,0

局部变量

连接数,

整数型

局部变量

i,

整数型

如果真

(拨号连接索引

＞

10

或

拨号连接索引

＜

1)

返回

(“”)

如果真结束

EntryName

[1]dwSize

＝

API_GlobalSize

(EntryName

[1])

lpcb

＝

EntryName

[1]dwSize

×

256

API_RasEnumEntries

(0,

0,

EntryName,

lpcb,

连接数)

如果真

(是否为空

(取所有名称))

返回

(到文本

(EntryName

[拨号连接索引]szEntryName))

如果真结束

计次循环首

(连接数,

i)

加入成员

(取所有名称,

到文本

(EntryName

[i]szEntryName))

计次循环尾

()

返回

(到文本

(连接数))

DLL定义

版本

2

DLL命令

API_RasHangUp,

整数型,

"RasApi32DLL",

"RasHangUpA",

,

挂断当前拔号连接

参数

hRasConn,

整数型,

,

连接句柄

DLL命令

API_GlobalSize,

整数型,

"kernel32dll",

"GlobalSize",

,

取结构尺寸

参数

结构,

RASENTRYNAME,

传址

DLL命令

API_RasEnumEntries,

整数型,

"rasapi32dll",

"RasEnumEntriesA",

,

取连接信息结构,连接名称,数量等等

参数

lpStrNull,

整数型,

,

保留字段,必须为NIL

参数

lpszphonebook,

整数型,

,

电话本名称,在Win9X下无作用

参数

lprasetryname,

RASENTRYNAME,

传址

数组,

RASENTRYNAME类型数组的指针

参数

lpcb,

整数型,

传址,

接收拨号连接名称的缓冲区的大小

参数

lpcentries,

整数型,

传址,

实际获得的拨号连接名称的数目

自定义数据类型

版本

2

数据类型

RASENTRYNAME,

,

取连接信息用结构

成员

dwSize,

整数型,

,

,

该结构占内存大小

成员

szEntryName,

字节型,

,

"255",

拨号连接名称

成员

lpcb,

字节型,

,

,

缓冲区的大小

成员

lpcEntries,

文本型,

,

,

实际的连接的个数

效果:

版本 2

支持库 internet

子程序 __启动窗口_创建完毕

局部变量 拨号连接数, 整数型

局部变量 容器1, 整数型

配置组合框加入项目 (“指定电话号码”, )

拨号连接数 ＝ 取拨号连接数 ()

计次循环首 (拨号连接数, 容器1)

配置组合框加入项目 (取连接名称 (容器1 － 1), )

计次循环尾 ()

配置组合框现行选中项 ＝ 0

子程序 _配置组合框_列表项被选择

如果 (配置组合框现行选中项 ≤ 0)

号码编辑框禁止 ＝ 假

帐号编辑框内容 ＝ “”

否则

号码编辑框禁止 ＝ 真

帐号编辑框内容 ＝ 取用户帐号 (配置组合框现行选中项 － 1)

如果结束

子程序 _挂断按钮_被单击

挂断 ()

子程序 _关闭按钮_被单击

销毁 ()

子程序 _拨号按钮_被单击

局部变量 电话号码, 文本型

如果真 (是否已在线 ())

信息框 (“仁兄,你已经连接到了Internet”, #错误图标 ＋ #确认钮, “小叶(Tencent)”)

返回 ()

如果真结束

如果 (配置组合框现行选中项 ≤ 0)

电话号码 ＝ 号码编辑框内容

否则

电话号码 ＝ “@” ＋ 到文本 (配置组合框现行选中项 － 1)

如果结束

如果 (拨号 (电话号码, 帐号编辑框内容, 密码编辑框内容, , 状态标签1))

状态标签1标题 ＝ “正在拨号”

否则

状态标签1标题 ＝ “拨号失败”

如果结束

子程序 _退出按钮_被单击

挂断 ()

------------------------------------------

一共需要以下控件：

组合框 1个

编辑框 3个

按钮 3个

标签 1个

不懂就问我吧

以上就是关于电话语音盒函数，用易语言开发，其中有些函数的参数不知该设置什么全部的内容，包括:电话语音盒函数，用易语言开发，其中有些函数的参数不知该设置什么、关于易语言制作一个程序的问题、易语言拨号上网程序怎么写等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！