TIERichEdit and TIERichEditToolbar are AWESOME components!
Unfortunately, the font name box in the TIERichEditToolbar does not display the complete font name:
I now hide the Font Box:
procedure TForm1.IERichEditToolbar1AddButton(Sender: TObject; ToolbarID, ButtonID: Integer; var Include: Boolean);
begin
if (ButtonID = IERichEditSelectFont_Button_ID) or // Hide Font Button
(ButtonID = IERichEditFontBox_Button_ID) or // Hide Font Box
(ButtonID = IERichEditSpellChecking_Button_ID) // Hide SpellChecking Button
then
Include := False;
end;
I now have to create another font control for my TIERichEdit
Question: How can I increase the width of the font name box so that the ENTIRE font name is displayed?
Search
Font name box width in TIERichEditToolbar
Posted - Dec 23 2025 : 12:45:40
