能力值：
( LV4，RANK：50 )
|
-
-
2 楼
try
mStrings.Clear;
vItemCount := SendMessage(mHandle, LB_GETCOUNT, 0, 0);
for I := 0 to vItemCount - 1 do begin
SetLength(S, SendMessage(mHandle, LB_GETTEXTLEN, I, 0));
SendMessage(mHandle, LB_GETTEXT, I, Integer(@S[1]));
mStrings.Add(S);
end;
|
能力值：
( LV4，RANK：50 )
|
-
-
3 楼
有关VB中ListView的内容截取已经有了结果
可下载示例(fpdedemo2-lv.zip )LVM_消息
详细如下:
http://www.xtremevbtalk.com/showthread.php?t=38276
http://www.vbforums.com/showthread.php?t=407611
不知道MSGrid的代码,能不能找到!
|
|
|
|
