ToolStripTextBox AutoSize不起作用

时间:2014-09-30 15:40:17

标签: winforms f# cefsharp

我使用下面的F#代码从ToolStripTextBox读取输入。

我的问题是,在调整表单大小时(例如浏览器中的URL字段),我无法调整ToolStripTextBox的大小。

有什么建议吗?

除其他外,我尝试了this form中的建议(使用正确的语法),但它没有用。

我的表单与书籍"Expert F# 3.0", page 429中的代码非常相似。

open System.Windows.Forms


let form = new Form(Size=new Size(780, 560))

...       

let toolbar = new ToolStrip(Dock=DockStyle.Top, Name="Toolbar")
toolbar.Location <- new Point(50,25) 
...    
let input = new ToolStripTextBox(Size= new Size(600,25))

...

let go = new ToolStripButton(DisplayStyle=ToolStripItemDisplayStyle.Text,Text="Reduce",Visible=true)

toolbar.Items.Add(new ToolStripLabel("Input:")) |> ignore
toolbar.Items.Add(input) |> ignore
toolbar.Items.Add(go) |> ignore 

1 个答案:

答案 0 :(得分:1)

以下代码解决了这个问题:

form.ClientSizeChanged.Add ( fun arg -> input.Size <- new System.Drawing.Size(form.Size.Width - 160, 25))