Discussion :

[Charly910]

Bonjour,

J'ai une grille de type TStringGrid, et je voudrais neutraliser la molette de la souris. Comment faire avec onMouseWheel (ou bien onMouseWheelDown et on MouseWheelUp ?)

Merci

Charly

[denokan]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
procedure TForm1.StringGrid1MouseWheelDown(Sender: TObject;
  Shift: TShiftState; MousePos: TPoint; var Handled: Boolean);
begin
  Handled := True;
end;

et pareil dans le MouseWheelUp

[Charly910]

Merci

cela fonctionne bien

Charly