What's the best way to set ListWidth to fit the longest entry in the list?

Many thanks, ABB