 |
Club Builder
Foro de C++Builder en español
|
| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
BuilderSystems
Cdt
Registrado: 19 Oct 2004Mensajes: 3
|
 Publicado: Mie 20 Oct, 2004 4:11 pm Asunto: Quien me Podria Responder? |
 |
|
Hola Como estan...
Lo que pasa es esto...estoy haciendo una aplicacion en la cual necesito capturar las coordenadas del mouse dentro de la forma....
y cada vez que se mueva mover una imagen en la direccion del mouse..
y a la vez actualizar las coordenadas de otras imagenes para que se muevan en la misma direccion de la primera...
Mi Pregunta es la siguiente....
Como hago para saber las coodenadas del mouse?...y como actualizar las coordenadas para que se muevan estando en ejecucion...??? |
|
| Volver arriba |
|
 |
Felip
Master
Registrado: 09 Jun 2004Mensajes: 200
|
| Publicado: Jue 21 Oct, 2004 5:38 am Asunto: |
|
|
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
int X, int Y)
{
Canvas->Brush->Color=clBtnFace;
Canvas->FillRect(ClientRect);
Form1->Canvas->TextOut(X, Y, " X = "+IntToStr(X)+
", Y = "+IntToStr(Y)+" ");
} |
|
| Volver arriba |
|
|
hola
Invitado
|
| Publicado: Jue 21 Oct, 2004 5:20 pm Asunto: |
|
|
| la verdad si me explicaras un poco mas detenidamente cada psao te podria entender mejor..gracias |
|
| Volver arriba |
|
|
Pablo A Castillo
Lt
Registrado: 14 Jul 2004Mensajes: 75Ubicación: Caracas - Venezuela
|
| Publicado: Sab 23 Oct, 2004 2:34 am Asunto: seguro! |
|
|
| Código: |
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
int X, int Y)
{
Canvas->Brush->Color=clBtnFace;
Canvas->FillRect(ClientRect);
Form1->Canvas->TextOut(X, Y, " X = "+IntToStr(X)+
", Y = "+IntToStr(Y)+" ");
}
|
no soy el pero espero ayudarte:
primero te vas a las propiedade del Form y el evento MouseMove le das doble click te aparecera
| Código: |
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift, int X, int Y)
{
}
|
le agregas para seleccionar el color:
| Código: |
Canvas->Brush->Color=clBtnFace;
// relleno
Canvas->FillRect(ClientRect);
//y donde desplegaras luego cada ves que se ejecute el evento
Form1->Canvas->TextOut(X, Y, " X = "+IntToStr(X)+
", Y = "+IntToStr(Y)+" ");
}
|
espero ayudarte un poco.
Saludos![/quote]
_________________
"Quid quid agis prudenter agas et respice finem"
(Hagas lo que hagas, actúa inteligentemente y considerando el fin)
MyNeoReport - the "FREE" Report Generator for .NET
http://myneoreport.sourceforge.net/
(funciona en Delphi for .NET  ) |
|
| Volver arriba |
|
|
|
|
No puedes publicar temas nuevos en este foro
No puedes responder a temas en este foro
No puedes editar tus mensajes en este foro
No puedes borrar tus mensajes en este foro
No puedes votar en las encuestas de este foro
|
© 2002–2026 Club Builder · Funciona con phpBB.
|
FAQ
Buscar
Miembros
Grupos de Usuarios
Registrarse
Perfil
Entra para ver tus mensajes privados
Entrar
