Publicentral.com - promocion de paginas webpromocion de paginas web
Mostrando Codigo - Delphi
Code

Delphi - Conseguir la posicion del mouse

Códigos Delphi

Mostramos una de las formas para conseguir la posicion exacta del raton o mouse
Visitas: 17,305 - 14/10/2003 21:17:41
CODIGO SIN DEMOSTRACIONNO CONTIENE ARCHIVO DESCARGABLEComentario
CODIGO


<!-- Codigo ofrecido por Tutores.org -->

  1. Uses
  2.   Windows;
  3.   Procedure GetCursor(Var X,Y:Integer);
  4. var
  5.   P: TPoint;
  6. begin
  7.   GetCursorPos(P);
  8.   X:=P.X;Y:=P.Y;
  9. end;
  10. procedure TForm1.Button1Click(Sender: TObject);
  11. Var X,Y:Integer;
  12. begin
  13.   GetCursor(X,Y);
  14.   ShowMessage(Format('%d : %d',[X,Y]));
  15. end;



ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo
<!-- Inicio enlace Tutores.org -->
<a title="Tutores.org - Conseguir la posicion del mouse" href="http://www.tutores.org/codigo/714/" target="_blank">Conseguir la posicion del mouse</a>
<!-- Final enlace Tutores.org -->
COMENTARIOS
Aun no existe ningun comentario para este Codigo.
INSERTAR COMENTARIO

Usuario:
Email:
Comentario:
Codigo Seguridad


Antes de enviar un comentario...
Todos los comentarios son revisados personalmente
Todo comentario que no haga relacion al codigo mostrado en esta pagina sera eliminado

Usuarios registrados tienen preferencia en recibir respuestas de ayuda!!
Ademas de poder insertar Imagenes,Enlaces y otras propiedades del editor.
Por favor, insertar los comentarios descriptivos.