Ver Mensaje Individual
  #3  
Antiguo 14-10-2003
Er_Manué Er_Manué is offline
Miembro
 
Registrado: may 2003
Posts: 74
Reputación: 21
Er_Manué Va por buen camino
Eso es sencillito, en el evento FormMouseWheel del formulario simplemente tienes que poner lo siguiente:

Código:
procedure TForm1.FormMouseWheel(Sender: TObject; Shift: TShiftState;
  WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
begin
  Handled := true;
end;
Simplemente diciendole que ya hemos manejado el evento (Handled := true;) sin hacer nada, tenemos solucionado el problema

Salu2
Responder Con Cita