Excel VSTO应用程序中可调整大小的winform控件的问题

时间:2012-07-17 18:02:34

标签: .net winforms vsto

我正在将一个Winforms控件添加到Excel工作表中。该控件继承自ListView,只是添加了用户通过“抓住”右下角来调整大小的能力,如下所示:

//This solution taken from 
//http://stackoverflow.com/questions/1535826/resize-borderless-window-on-bottom-right-corner/1535943#1535943
public class MyListView : ListView
{
    protected override void WndProc(ref Message m)
    {
        const int wmNcHitTest = 0x84;
        const int htBottomLeft = 16;
        const int htBottomRight = 17;
        if (m.Msg == wmNcHitTest)
        {
            int x = (int)(m.LParam.ToInt64() & 0xFFFF);
            int y = (int)((m.LParam.ToInt64() & 0xFFFF0000) >> 16);
            Point pt = PointToClient(new Point(x, y));
            Size clientSize = ClientSize;
            if (pt.X >= clientSize.Width - 16 && pt.Y >= clientSize.Height - 16 && clientSize.Height >= 16)
            {
                m.Result = (IntPtr)(IsMirrored ? htBottomLeft : htBottomRight);
                return;
            }
        }
        base.WndProc(ref m);
    }
}

此控件将添加到我的工作表中:

MyListView listView = new MyListView();

Microsoft.Office.Tools.Excel.Worksheet worksheet =
  Globals.Factory.GetVstoObject(Globals.ThisAddIn.Application.ActiveWorkbook.Sheets[1]);

worksheet.Controls.AddControl(listView, 0, 0, 100, 100, "myListView01");

有了这个,我可以通过抓住右下角并向左/向上拖动来使控件更小。

问题在于我无法将其放大,因为它不允许将光标拖过MyListView的右/底边框。在做了一些调查之后,我相信这是因为所有通过VSTO添加到工作表的控件都是一个名为VSTOContainerControl的控件的父级,它的大小总是设置为与它的子控件相同。这一事实已在MSDN博客here上得到确认。我发现,如果我以编程方式增加父VSTOContainerControl的大小,则子MyListView也会自动增加。但是,我需要用户能够随意手动增加大小。我怎样才能做到这一点?

1 个答案:

答案 0 :(得分:0)

我建议在listview和容器控件之间放一个小的边距,以便你可以将调整大小手柄拖动几个像素,并以编程方式将容器的大小修改为新的大小+边距。容器调整大小可以在事件处理程序中完成,以便在用户尝试调整大小时触发任何事件。