如何 提取 resize 或resizing 消息 截获什么消息,如何分辨出来? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure WNdProc(var msg: Tmessage); override;procedure TForm1.WNdProc(var msg: Tmessage);var w, h: Integer;begin inherited; if msg.Msg = wm_size then begin h := HiWord(msg.LParam); w := LoWord(msg.LParam); end;end; Delphi 动态生成TreeView Access violation错误,请问有没办法直接根据地址定位到出错行 批量删除文件的问题. 怎把一个DBGRID中选中的记录添加到另一个DBGRID中? 寻求能将通过可视化生成的单元(包括界面)转换成封装好的类的工具 关于对象实例化的一个小问题。想了想,没有想明白(转贴)欢迎探讨 现在成立5-6人的公司开发软件一年的成本在多少? 怎样用代码在sqlserver上新建一个库? ☆★☆★哪有Delphi5正式版下载??★☆★☆ 大富翁开通了,这里的人气差多了…… Unicode 汉字的问题 delphi2010 业务构件平台功能及理念
procedure WNdProc(var msg: Tmessage); override;procedure TForm1.WNdProc(var msg: Tmessage);
var
w, h: Integer;
begin
inherited;
if msg.Msg = wm_size then
begin
h := HiWord(msg.LParam);
w := LoWord(msg.LParam);
end;
end;