很郁闷前2天可以得到今天试了一下又得不到了啊!!
源代码
var
MsgResultBuf: integer; //记录信息缓冲区大小
MsgResultLength: longint; //信息长度
begin
MsgResultLength := SendMessage(Handle, WM_GETTEXTLENGTH, 0, 0) + 1; //获取指定句柄控件的文本长度
GetMem(Msg, MsgResultLength); //为要读取的信息分配内存
MsgResultBuf := LongInt(Msg); //定义缓冲区大小
SendMessage(Handle, WM_GETTEXT, MsgResultLength, MsgResultBuf);
ShowMessage(IntToStr(MsgResultLength));
FreeMem(Msg, 0);现在是得不到MsgResultLength了
那位大侠帮帮忙啊,在线急等!!!
源代码
var
MsgResultBuf: integer; //记录信息缓冲区大小
MsgResultLength: longint; //信息长度
begin
MsgResultLength := SendMessage(Handle, WM_GETTEXTLENGTH, 0, 0) + 1; //获取指定句柄控件的文本长度
GetMem(Msg, MsgResultLength); //为要读取的信息分配内存
MsgResultBuf := LongInt(Msg); //定义缓冲区大小
SendMessage(Handle, WM_GETTEXT, MsgResultLength, MsgResultBuf);
ShowMessage(IntToStr(MsgResultLength));
FreeMem(Msg, 0);现在是得不到MsgResultLength了
那位大侠帮帮忙啊,在线急等!!!
解决方案 »
- 老婆大人走了,她说要带别人的老公回来。就睡在原来属于我们两个人的床上。怎么办?
- chart控件问题(取出seriors[i]曲线对应的x,y值)?
- 晕指针!
- 怎么卸载安装的activeX控件?(安装了个mapx4.5的activx控件,现在安装mapx5,不知道怎么卸载mapx4.5)
- 新手提问,大侠们帮一下忙了,郁闷了好几天了。
- 关于 dxsock 对点对点的处理 问题
- 怎样消除form最小化后起caption定义的怪字符?
- 一个小问题???帮忙解决 即给分
- 求助:Delphi 连接sql server
- 怎样不用安装access而将驱动升级到access2000
- Delphi 用SendMessage设置外部程序密码编辑框的值老是提示密码不对?
- TStringGrid同步问题,盼高手
初学DELPHI代码肯定会有问题的,请大家多指点