| Pregunta: | 1463 - MOUSE EN MODO TEXTO |
| Autor: | Pepo Ramzez |
| Alguién me puede ayudar, necesito me digan como habilitar el mouse en modo texto de Pascal, pero sin utilizar lenguaje ensamblador, para manejar menús.. gracias | |
| Respuesta: | Martin flores |
| la interrupcion es $33; primero tiene que llamar a algunos servicios antes , ahi te va el codigo
R es una variable de tipo regsiters (ax,dx,bx,cx,es,falgs ect) r.ax:=$0000;{reseteo el driver del mouse} intr($33,r);{llamo la interrupcion , con el proceimiento intr y le tengo que} {le tengoq ue pasar los registros por medio de R} r.ax:=$0001;{ e aqui la gracias show the mouse, muestro el mouse} intr($33,r); {llamo nuevamente la interrupcion} (*-----------------------------------------------------------------------*) r.ax:=$0003;{ este servicio devuelve en bx=estado (1=click) cx=culumna y dx=fila , esta matris va de 8 en 8 } intr($33,r); saludos | |
| Respuesta: | J RC |
| Lo mejor para esto es que consigas la Guía de Referencia del programador del ratón de Microsoft y un disco que la acompaña, que contiene una librería llamada MOUSE.LIB con 30 funciones básicas para el manejo del ratón. Algunas de estas funciones son la 0 (inicializar ratón), la 1 (visualizar el cursor), la 2 (lo borra), la 3 que lee el estado de los botones y la posición, etc. Enlazando estas funciones puedes crearte una unidad de alto nivel para manejar el ratón. | |