| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
Picard
Master
Registrado: 18 Ene 2004Mensajes: 218Ubicación: Palamos (Girona) España
|
 Publicado: Sab 07 Feb, 2004 1:09 pm Asunto: Posicion del cursor |
 |
|
Hola de nuevo compañeros,quisiera capturar la posicion del puntero del mouse en un TPanel y mostrar dicha posicion en un Tlabel que esta en otro panel,he probado con setcursorpos,pero no me deja cargar dicha posicion en el caption del label
gracias |
|
| Volver arriba |
|
 |
_Viktor
Master
Registrado: 20 Jul 2003Mensajes: 463Ubicación: Santiago, Los Angeles - Chile
|
| Publicado: Sab 07 Feb, 2004 7:16 pm Asunto: |
|
|
Hola, si quieres saber las coordenadas de la posicion del puntero sobre el Panel, puedes simplemente usar el evento OnMouseMove, es decir:
| Código: | void __fastcall TForm1::Panel1MouseMove(TObject *Sender, TShiftState Shift,
int X, int Y)
{
Label1->Caption = IntToStr(X)+":"+IntToStr(Y);
} |
Ahora si lo que quieres es obtener las coordenadas en relacion a toda la pantalla, tienes que usar GetCursorPos, la que mencionas tu es para setear las coordenadas, no obtenerlas:
| Código: | void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
POINT Punto;
if(GetCursorPos(&Punto))
Label1->Caption = String(Punto.x)+":" + String(Punto.y);
} |
Haber cual te sirve. 
Saludos!
_________________
"Ser inteligente no es ser mas, solo equivocarse menos y no usar Visual Basic"
Atte.
Victor Yañez
Apoyen el Proyecto OpenSource del Club Builder. Ya tenemos componentes Listos!!! |
|
| Volver arriba |
|
|
Picard
Master
Registrado: 18 Ene 2004Mensajes: 218Ubicación: Palamos (Girona) España
|
| Publicado: Sab 07 Feb, 2004 7:28 pm Asunto: gracias viktor |
|
|
| Muchisimas gracias por todo,voy a probarlo ahora mismo,aunque estoy segurisimo de que funciona |
|
| Volver arriba |
|
|
Raúl
Capt
Registrado: 16 Ago 2002Mensajes: 174Ubicación: Oruro (Bolivia)
|
| Publicado: Lun 09 Feb, 2004 9:48 pm Asunto: Acerca del cursor |
|
|
Hola espero que me puedan ayudar, lo que yo necesito es situar el cursor en una posicion determinada, esto para simular la opcion snap del Auto Cad, no se si me dejo entender por ejemplo en Auto Cad el cursor se mueve de punto en punto y no asi sobre toda la pantalla claro si esta habilitada la opcion y yo quiero hacer es algo parecido he probado con el SetCursorPos pero no me sale haber si alguien me puede ayudar...
Gracias a todos!!! |
|
| Volver arriba |
|
|
_Viktor
Master
Registrado: 20 Jul 2003Mensajes: 463Ubicación: Santiago, Los Angeles - Chile
|
| Publicado: Lun 09 Feb, 2004 9:54 pm Asunto: |
|
|
Hola, para eso tienes la funcion opuesta a GetCursorPos, fijate en la ayuda acerca de SetCursorPos, no te pongo un ejemplo pq con el que tienes arriba se puede concluir como usar la que te menciono...
Saludos!
_________________
"Ser inteligente no es ser mas, solo equivocarse menos y no usar Visual Basic"
Atte.
Victor Yañez
Apoyen el Proyecto OpenSource del Club Builder. Ya tenemos componentes Listos!!! |
|
| Volver arriba |
|
|
|
FAQ
Buscar
Miembros
Grupos de Usuarios
Registrarse
Perfil
Entra para ver tus mensajes privados
Entrar
