Запретить минимизацию дизайнера

отредактировано 14:32 Раздел: FastReport 4.0
Тут уже задавали этот вопрос в разделе FR3, но по скольку ответа нет -- спрошу еще раз.

Использую в программе в runtime дизайнер FR. Модальное окно. Если нажать кнопку Minimize, то ВСЁ окно программы сворачивается в одну панельку внизу. Хуже того: в эту панельку ткнуть и развернуть программу обратно НЕ ПОЛУЧАЕТСЯ: панелька не тыкается. Еще хуже программа пропадает даже из списка задач в диспетчера задач, ее можно снять только из списка процессов.

Как запретить кнопку минимизации, или другим каким-нибудь способом прикрыть это дело? В исходники лезть не предлагать: я хочу иметь нормальный, обновляемый FR чтобы каждый раз при обновлении с этим не геморроиться.

Комментарии

  • xlaalaaxlaalaa Минск
    отредактировано December 2009
    Для интеграции в окно дизайнера своих каких то обработчиков можно использовать событие TFrxDesigner.OnShow. Можно в своем коде подписаться на это событие. Sender преобразовать к типу TfrxDesignerForm. Получите ссылку на окно дизайнера. По ссылке на форму окна дизайнера, можно изменить параметры окна, динамически переназначить свою обработку событий и т.д.

    Таким образом можно не менять исходный код FastReport, а некоторые поправки к работе окна диайнера создавать в своем коде.
  • отредактировано 14:32
    Большое спасибо за совет, идея понятна.

    Но что-то не прокатило. Причем странно как-то. Написал следующее:
    procedure TdmMain.desReportShow(Sender: TObject);
    begin
      (Sender as TfrxDesignerForm).BorderIcons :=
       (Sender as TfrxDesignerForm).BorderIcons -
       [biMinimize];
    end;
    
    При этом при вызове:
    dmMain.desReport.DesignReport;
    
    получил:
    1) Ошибку:
    написал:
    "Cannot change Visible in OnShow or OnHide."
    2) Кнопка отрубилась!

    Уже почти хорошо. Как ошибку теперь убрать? :)
  • отредактировано 14:32
    Up, извините. Очень нужно. :)
  • отредактировано 14:32
    Самый простой вариант открыть frxDesgn.dfm в среде (исходники FR не обязательны) и добавить в object frxDesignerForm: TfrxDesignerForm
    св-во BorderIcons = [biSystemMenu, biMaximize]. Сохранить, пересобрать приложение.

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.