如何改變cxProgressBar的高度

Question

如何改變cxProgressBar的高度？

我已經試過，但至今沒有運氣：

var 
    cxProgressBar1: TcxProgressBar; 
begin 
    cxProgressBar1 := TcxProgressBar.Create(Self); 

    with cxProgressBar1 do 
    begin 
    Parent := Self; 
    Position := 22; 
    Width := 113; 
    Height := 120; 
    Properties.Orientation := cxorVertical; 
    end; 
end; 

的高度保持不變。

Answer 1

我忘了設置AutoSize：= false;設置寬度和/或高度之前

所以這是解決方案：

var 
    cxProgressBar1: TcxProgressBar; 
begin 
    cxProgressBar1 := TcxProgressBar.Create(Self); 

    with cxProgressBar1 do 
    begin 
    AutoSize := false; 
    ..... 
    end; 
end;