![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
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;