1. Получи 30.000 рублей. Для получения денег необходимо принять участие в конкурсе авторов codeby. С условиями и призами можно ознакомиться на этой странице ...

    Внимание! Регистрация авторов на конкурс закрыта.

    Скрыть объявление
  2. Требуются разработчики и тестеры для проекта codebyOS. Требования для участия в проекте: Знание принципов работы ОС на базе Linux; Знание Bash; Крайне желательное знание CPP, Python, Lua; Навыки системного администрирования. Подробнее ...

    Скрыть объявление

Как подтянуть к компонентам Events?

Тема в разделе "Delphi - программирование", создана пользователем maxshuv, 2 июн 2006.

Статус темы:
Закрыта.
  1. maxshuv

    maxshuv Гость

    Репутация:
    0
    Такая проблема.
    Подскажите пожалуйста код или что необходимо сделать? Нужно из TWinControl подътянуть в DBGrid Eventsы: OnMouseWheel, OnMouseWheelDown и OnMouseWheelUp!!!
     
  2. maxshuv

    maxshuv Гость

    Репутация:
    0
    На Delphi 5!!!
    Нужно для прокрутки мыши на DBGrid.
     
  3. Barmutik

    Barmutik Гость

    Репутация:
    0
    Код:
     TAdvDBGrid = class(TDBGrid)
    private
    { Private declarations }
    protected
    { Protected declarations }
    public
    { Public declarations }
    published
    property OnMouseWheelDown;
    property OnMouseWheelUp;
    end;
     
  4. maxshuv

    maxshuv Гость

    Репутация:
    0
    А поточнее можно? Надо ли мне прописывать в этом модуле процедуры для OnMouseWheelDown, OnMouseWheelUp как это сделано для OnMouseDown,OnMouseUp?
    А то я уже всяко попробовал неполучается.
     
  5. maxshuv

    maxshuv Гость

    Репутация:
    0
    А поточнее можно? Надо ли мне прописывать в этом модуле процедуры для OnMouseWheelDown и OnMouseWheelUp, как это сделано для OnMouseDown и OnMouseUp?
    А то я уже всяко попробовал не получается.
     
  6. Barmutik

    Barmutik Гость

    Репутация:
    0
    Я привёл полный пример нового компонента, который просто выставляет спрятанные события ..

    Ничего больше писать не надо ... за Вас уже всё написано :)
     
  7. maxshuv

    maxshuv Гость

    Репутация:
    0
    У меня уже есть компонента, которую я создал, и я в неё просто добавил эти события
    property OnMouseWheelDown;
    property OnMouseWheelUp;
    Но у меня до сих пор, как и раньше, мышь прокручивается только до нижней и верхней видимой строки!!!
    Что делать?
     
  8. maxshuv

    maxshuv Гость

    Репутация:
    0
    Спасибо получилось.
    Ещё пару вопросиков. Как сделать так чтобы при начале прокрутки мыши активная позиция переходила на следующую, а не на последнюю на экране?
    И есть такая возможность определить входит Dataset на Экран DBGrid или он больше?
     
  9. maxshuv

    maxshuv Гость

    Репутация:
    0
    Активная позиция при начальной прокрутки мыши встаёт даже не на последнюю видимую позицию на экране, а на первую невидимую запись!
     
  10. maxshuv

    maxshuv Гость

    Репутация:
    0
    Я использую процедуру TimedScroll([sdDown]),TimedScroll([sdUp]).
     
  11. Barmutik

    Barmutik Гость

    Репутация:
    0
    А вы не используйте эту процедуру а скрольте руками в зависимости от объёма прокрутки, тогда вы сами будете контролировать активную запись в гриде..

    Насчёт посчитать влазит или не влазит.. умножте количество записей на толщину строки + толщина хедера и смотрите больше меньше ширины контрола .. может есть что-то и более умное .. но пока что-т сходу не приходит в голову...
     
  12. maxshuv

    maxshuv Гость

    Репутация:
    0
    Спасибо за подсказки!
     
Загрузка...
Похожие Темы - Как подтянуть компонентам
  1. grayuser
    Ответов:
    5
    Просмотров:
    66
  2. mustwanted
    Ответов:
    17
    Просмотров:
    158
  3. PingVinich
    Ответов:
    3
    Просмотров:
    111
  4. Shandrik
    Ответов:
    18
    Просмотров:
    152
  5. SlipX
    Ответов:
    18
    Просмотров:
    223
Статус темы:
Закрыта.

Поделиться этой страницей