请问如何截获本窗体中TListView中的LVM_SETCOLUMNWIDTH消息? 不想改写VCL,也不想新继承一个对象... 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 那就直接在Form中替换TListView的窗口过程 LVM_SETCOLUMNWIDTH消息好象不会发到delphi单元中。 我其实想截获ListView Comlun改变宽度的消息,有人知道该怎么作吗? 1、定义变量和函数 TWndMethod OldLVWndProc; void __fastcall NewLVWndProc(TMessage& Message);2、在窗口构造函数中执行以下语句 OldLVProc=LV1->WindowProc; LV1->WindowProc=NewLVWndProc; 3、编写实际的代码:void __fastcall TForm1::NewLVWndProc(TMessage& Message);{ if(Message.Msg == LVM_SETCOLUMNWIDTH) { //改变列宽度 } OldLVWndProc(Message);} BCB_FANS(四大名捕之追杀令),你这是BCB吧?我看不懂,能不能帮我翻译成Delphi的呢? 免费送书了! 類的私有方法,私有數據能繼承嗎? 这个怎么做呢?电脑自动重启(强制结束所有进程) 窗体嵌套问题 运行问题 keycode问题 网上有 李维的《delphi5.x Ado/Mts/Com+》高级程序设计篇 下载吗? 怎样侦测ADOCONNECTION是否已同SQLSERVER连接 请教如何改变Delphi的打开文件的默认路径????=================》我是菜鸟! 求教:哪位知道有无Word和TBlobField綑定的组件? delphi中如何使用日期字段过滤,带有格式(yyyy-mm),在线等待!急! DELPHI能将IE里面收藏的URL能读出来吗?
void __fastcall NewLVWndProc(TMessage& Message);2、在窗口构造函数中执行以下语句 OldLVProc=LV1->WindowProc;
LV1->WindowProc=NewLVWndProc;
3、编写实际的代码:void __fastcall TForm1::NewLVWndProc(TMessage& Message);
{
if(Message.Msg == LVM_SETCOLUMNWIDTH)
{
//改变列宽度
}
OldLVWndProc(Message);
}