2011-06-27 116 views
5

如何在Delphi 7中設置窗體的寬度和高度?表單包含不同類型的控件。我需要將主窗體大小設置爲127x263。它應該通過點擊按鈕以編程方式更改 。如何在Delphi中設置窗體的寬度和高度

+3

請確保你總是包含通用的delphi標籤,因爲沒有那麼多人檢查delphi-7標籤。我這次添加了它,但對於將來的問題,請記住這一點 - 這樣你會得到更好的答案。 –

+0

好的。我將在未來這樣做,謝謝 –

回答

13

像這樣:

MainForm.Width := 127; 
MainForm.Height := 263; 

或者你想在客戶區設置爲這些維度:

MainForm.ClientWidth := 127; 
MainForm.ClientHeight := 263; 

當然,你最常用的設置在設計時在Object Inspector這些屬性然後將它們寫入到表單的.dfm文件中。

如果要出現一個按鈕這樣的改變單擊添加處理程序按鈕,點擊看起來像這樣:

procedure TMainForm.Button1Click(Sender: TObject); 
begin 
    Width := 127; 
    Height := 263; 
end; 

在這最後的摘錄,你不需要指定MainForm對象實例因爲事件處理程序是TMainForm類的成員,因此Self是隱含的。

如果你想跟着烏爾裏希·格哈特的建議(見註釋),並使用SetBounds然後你可以這樣寫:

SetBounds(Left, Top, 127, 263); 

最後,如果你的窗體有Scaled = True那麼你需要處理的字體縮放。像這樣的硬編碼像素尺寸將不適合字體縮放設置爲與您的機器不同的值的機器。

+13

而不是單獨更改寬度和高度,我會使用SetBounds來最小化更新。 –

相關問題