На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
! ПРАВИЛА РАЗДЕЛА · FAQ раздела Delphi · Книги по Delphi
Обязательно выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.

Этот раздел предназначен для вопросов, посвященных разработке компонентов, а также для тестирования собственных бесплатных компонентов с открытым исходным кодом.

Здесь запрещается:
1. Размещать ссылки на какие-либо коммерческие компоненты, реализующие требуемую функциональность.
2. Обсуждать и тестировать коммерческие компоненты или компоненты с закрытым кодом.
3. Давать ссылки на сайты с исходным кодом компонентов. Все тестируемые исходные коды должы быть размещены на сайте ИСХОДНИКИ.RU.
Модераторы: Rouse_, DimaBr
  
> Изменение размера TstringGrid
    Какое событие нужно отследить, чтобы после изменения (desing-time или run-time) размеров StringGrid получить текущие размеры контрола и поправить его на высоту кратную высоте ячеек, т.е. чтобы были видны целые ячейки, а не половина?
    Сообщение отредактировано: TechnoMag -
      ExpandedWrap disabled
        function TMyGraphicControl.CanResize(var NewWidth: Integer;
          var NewHeight: Integer): Boolean;
        begin
          if not (csLoading in ComponentState) and ((NewWidth < min_Width)
          or (NewHeight < min_Height)) then
            Result := false
          else
            Result := inherited CanResize(NewWidth, NewHeight);
        end;
      0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
      0 пользователей:


      Рейтинг@Mail.ru
      [ Script execution time: 0,0355 ]   [ 17 queries used ]   [ Generated: 23.04.24, 11:18 GMT ]