Текущий архив: 2006.05.07;
Скачать: CL | DM;
Вниз
Cкрол мыши Найти похожие ветки
← →
KyRo (2006-04-17 11:02) [0]подскажите как сделать что бы в дбгриде работал скрол мыши ?
← →
Ega23 © (2006-04-17 11:13) [1]Какой набор данных используешь?
← →
ANB © (2006-04-17 11:18) [2]Взять эхлибовский грид.
← →
KyRo (2006-04-17 11:36) [3]
> Какой набор данных используешь?
Что имееш ввиду ?
> Взять эхлибовский грид
Уже поздно программа почти готова и менять гриды не хочу !
← →
Gydvin © (2006-04-17 11:55) [4]А придеться )))
Это либо наружный код дописывать к каждому либо ипользовать потомка (а значит менять), а второе значительно проще
← →
KyRo (2006-04-17 11:58) [5]А кто нить может скинуть этот компонент? на мыло или кинуть на него ссылочку
OlegMail@bigmir.net
Заранее благодарен.
← →
pavel_guzhanov © (2006-04-17 13:50) [6]Положи на форму ApplicationEvents и создай такую процедуру:
procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
var
I: SmallInt;
begin
if Msg.message = WM_MOUSEWHEEL then
begin
Msg.message := WM_KEYDOWN;
Msg.lParam := 0;
I := HiWord(Msg.wParam);
if I > 0 then
Msg.wParam := VK_UP
else
Msg.wParam := VK_DOWN;
Handled := False;
end;
end;
Взял не помню из какого фака, у меня работает...
← →
KyRo (2006-04-17 15:14) [7]Спасибо и у меня работает.
← →
ян (2006-04-19 19:36) [8]2pavel_guzhanov
Большое спасибо!классно работает!
← →
Германн © (2006-04-20 03:15) [9]Нет и не было у меня претензий (особых) к продукции Борланд, но уж эта "недоделка" мне просто непонятна!
Страницы: 1 вся ветка
Текущий архив: 2006.05.07;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.01 c
