如何通过Delphi自动调整TStringGrid的行高?