[Bug 32427] Delphi listview: wrong font when using custom draw