Comando GetButton
Este comando te permide identificar el Boton del mouse
Presionado.

Sintaxi :
     GetButton(n)=(Funcion) Donde la variable (n) debe contener
     un numero:

      GetButton(1) identifica el boton Primario del Mouse
      GetButton(2) identifica el boton Secundario del Mouse

     GetButton(n)=(funcion) Donde la Variable (Funcion) debe contener
     un comando :

      GetButton(1)=buttonDown detecta el boton primario Presionado
      GetButton(1)=buttonDown detecta el boton primario SinPresionado

Esta Complicado He.Bueno Copia el codigo a tu Programa:
                uses crt,dos,mouse;
                var  (Define tus Variables);
                begin
                     repeat
                     until getbUtTon(1)=buttonDown;
                end.

