Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.04.18;
Скачать: [xml.tar.bz2];

Вниз

Ревкция DBgrida на колесико мыши   Найти похожие ветки 

 
Anna   (2004-03-31 12:21) [0]

Уважаемые мастера, help me, please!
Есть DBgrid, dgRowSelect:=true. При щелчке мышкой строка выделяется цветом и треугольником слева. А если покрутить колесико мыши, то треугольник остается на месте, полоска съезжает и при следующем щелке возникает второй треугольник, причем не там, где щелкнули, а в совершенно другом месте.
Хочется как-то от этого избавиться...


 
VLAD-MAL   (2004-03-31 12:24) [1]

Старый глюк TDBGrid. Юзай TDBGridEh.


 
Vemer ©   (2004-03-31 12:25) [2]

Вариант:
Кинуть на форму ApplicationEvent и в его методе onMessage написать:
If Msg.message = WM_MOUSEWHEEL then
  begin
   Msg.message := WM_KEYDOWN;
   Msg.lParam := 0;
 If SmallInt(HiWord(Msg.wParam)) > 0 then
    Msg.wParam := VK_UP
  else
    Msg.wParam := VK_DOWN;
  Handled := False;
 end;


 
Anna   (2004-03-31 12:29) [3]

Спасибо, сейчас попробую!
:-)


 
Anna   (2004-03-31 12:44) [4]

Ура! Заработало!



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.04.18;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.043 c
14-1080022462
saNat
2004-03-23 09:14
2004.04.18
HELP! Windows 98 и GF2 400 64Mb


4-1076174980
nester
2004-02-07 20:29
2004.04.18
Как внедриться в OutlookExpress.


1-1080392550
Yuri Btr
2004-03-27 16:02
2004.04.18
Отрисовка background в строке List View


14-1080406441
microsoft
2004-03-27 19:54
2004.04.18
Программный комплекс управления локальной сетью


4-1076074289
able
2004-02-06 16:31
2004.04.18
Сокеты на WinAPI





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский