看代码:
procedure recall(hTalk:HTALK;pMes:Pchar;iLen:integer);
var st:string;
begin
st:=strpas(pMes);
st:=Leftstr(st,ilen);
NetPhoneForm.Edit1.Text:=st;
end;
这段代码 st:=strpas(pMes); 程序一执行到这里 就报读写地址 错误
请问哪位大虾知道哪儿出了问题!先谢了!急急!!
procedure recall(hTalk:HTALK;pMes:Pchar;iLen:integer);
var st:string;
begin
st:=strpas(pMes);
st:=Leftstr(st,ilen);
NetPhoneForm.Edit1.Text:=st;
end;
这段代码 st:=strpas(pMes); 程序一执行到这里 就报读写地址 错误
请问哪位大虾知道哪儿出了问题!先谢了!急急!!
解决方案 »
- 关于以太网抄表通讯问题求助
- 不显示删除回复显示所有回复显示星级回复显示得分回复 有没有写入PE的的代码示例啊.D6/B6以前没有这个编译参数,我想给写到PE里面去
- IDHTTP发送数据的问题
- 兄弟帮帮忙。。。急急急!!!!!!!!!!!!!!!!!!!
- 今天有10分了,仍把这个问题抛出来求解
- 郁闷,啥也不说了,散分
- 调用华为SMEIDLL.dll中的SubmitAExEx函数发送返回总是4,还请高手指教!(解决后另赠100分)
- 大家能推荐几个界面不错的小型软件么?
- 新手上路,一个richedit的问题!如何在richedit的任意位置插入字符;连续undo如何处理?
- 急!显示.jpg文件的组件是哪一个,如何用?
- 如何动态生成弹出菜单的子菜单?
- 这是简单的问题吗?我不会!
try
...
except
on E: Exception showmessage(E.Message);
end;
procedure Hbtalk_SetCallBackFun(pMesCallBack:Pointer);far;stdcall;external 'talk.dll' name 'Hbtalk_SetCallBackFun';
的函数把它设置
现在的异常是:Access violation at address 0040409f in module
'client_demo.exe'.read of address 00000005
凡是一对 他操作就有错 如果直接为NetPhoneForm.Edit1.Text:=‘asdf’;
程序就不会报错
可能是你传的pMes不对吧
还有其他代码没?
一但调用 Hbtalk_SendMessage(h,pchar('aaaaa'),5);这个函数
就会自动转入 recall 中
我想说的就是 在pMEs中还会有一些乱码
因为发送这个字符的通道和语音是一个通道 我看了 是有一些
乱马
Sorry!
小生解答不了
闪人,睡觉
----------
Hbtalk_SendMessage(h,pchar('aaaaa'),5);//用‘aaaaa’就不用转换