Отключить перенос строки в CreateMessageDialog

[Kronos913]

После долгих поисков, нашел как в выводимом окошке исправлять кодировку

Procedure ShowMessageRus(const s:string);
begin
    with CreateMessageDialog(s, mtCustom, [mbOk]) do
    try
      Font.Charset:=RUSSIAN_CHARSET;
      ShowModal;
    finally
      Free;
    end;
end;

Вопрос: как отключить перенос строки? В сообщении на 40 символов все время последнее слово переносится на новую строку
Попытка задать размеры окна не помогла

[Arigato]

Сообщение от Kronos913

После долгих поисков

Интересно, почему поиски не привели вас к мысли перестать использовать среду разработки 20-летней давности?

[Kronos913]

Я как-то поставил D-10, вроде немного новее. Итого, с тем же кодом, ехе-шник начал занимать вдвое больше места. А на новых версиях, как я слышал, там вообще раз в 20 больше будет

Ну и еще, я как-то пытался поставить современные версии, но с ключами активации были проблемы

[Arigato]

Сообщение от Kronos913

Итого, с тем же кодом, ехе-шник начал занимать вдвое больше места.

А не все ли равно? Или у вас на диске место заканчивается?

[Shouldercannon]

Переводите параметр отмеченный красным в False и простой exe вместо 10 Мб будет весть 2 Мб.