在delphi中，如何让Label正好显示文本，(宽度固定，高度正合适)，文本内容可变

在delphi中，如何让Label正好显示文本，(宽度固定，高度正合适)，文本内容可变
我用过Width:=500；AutoSize:=false;WordWrap:=true; 可是自动换行后，高度不合适，（不是大小就是小了），在文本内容可变，宽度固定的前提下，怎么能让Label正好显示文本？