Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

StringGrid [XP]


Litestone ©   (2007-02-11 21:17:00) 

Знает ли кто нибудь, как заставить параметр Row(выделенная строка) в StringGrid оставаться неподвижным, когда StringGrid прокручивается колесом мышки.


Litestone   (2007-02-11 21:54:00) [1]

Спасибо RASkov, всё работает.


RASkov   (2007-02-11 21:30:00) [2]

 TMyStringGrid= class(TStringGrid)
   function DoMouseWheelDown(Shift: TShiftState; MousePos: TPoint): Boolean; override;
   function DoMouseWheelUp(Shift: TShiftState; MousePos: TPoint): Boolean; override;
 end;
 TStringGrid = class(TMyStringGrid);

 TForm1 = class(TForm)
   StringGrid1: TStringGrid;
  .....
implementation
{ TMyStringGrid }
function TMyStringGrid.DoMouseWheelDown(Shift: TShiftState; MousePos: TPoint): Boolean;
begin
 ShowMessage('MyMouseWheelDown');
end;

function TMyStringGrid.DoMouseWheelUp(Shift: TShiftState; MousePos: TPoint): Boolean;
begin
 ShowMessage('MyMouseWheelUp');
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо