Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   TMediaPlayer - Ocultar cursor (https://www.clubdelphi.com/foros/showthread.php?t=37529)

ariefez 15-11-2006 19:10:21

TMediaPlayer - Ocultar cursor
 
Hola a todos,

eh buscado informacion sobre eso y la verdad no encontre naa...

hay alguna manera de ocultar el cursor al reproducir un video, este lo hago en un panel. La propiedad cursor del panel la cambio a -1, desaparece el cursor pero no en el area en el q se esta reproduciendo el video...

PD: Tambien busque sobre MCI, algo a de faltarme para encontrarlo o es q anda bien escondido :rolleyes:.

dec 16-11-2006 05:43:19

Hola,

No sé si te valdría utilizar la función "ShowCursor" de la unidad "Windows.pas":

Código Delphi [-]
begin
  // Ocultamos el cursor
  Windows.ShowCursor(false);
  
  // Sleep(2000);

  // Mostramos el cursor
  Windows.ShowCursor(true);  
end;

ariefez 16-11-2006 16:56:10

Hola, no se q pasa, pero al ejecutar la funcion ShowCursor el cursor solo se oculta en la parte donde no se muestra el video (el video lo redimensiono para q mantenga su proporcion).

Al parecer al asignarle al panel como display, el media player toma posecion de dicho control y es independiente a la aplicacion.

¿no habra algun comando para enviar por mciSendCommand? q afecte al display o algun otro metodo.

espero sus sugerencias, de antemano gracias por sus respuestas.

dec 26-06-2007 19:55:45

Hola,

Un poco tarde, pero, veo que estás en línea además (y yo probando con estas cosas..., casualmente)... digo que tal vez puedas utilizar cierto "truco" de Zarko Gajic: Hiding the cursor from the screen, aunque, a decir verdad, yo estoy probándolo en Windows XP y no parece funcionar como se espera...

PD. Si después de tanto tiempo encontraste cómo hacerlo de otro modo... tal vez alguien (yo mismo) pudiera estar interesado en saberlo. :)

ariefez 27-06-2007 17:28:00

Hola Dec, La verdad no me acuerdo muy bien como quedo, pero creo q lo deje de esa forma porque el video lo reproducia en el escritorio extendido.

PD1: De todas maneras voy a revisar y de paso probare el codigo q me sugieres.

PD2: Hay alguna forma de q notifiquen si responden en los hilos q uno interviene (No he buscado info sobre esto, es solo curiosidad, ya q encontre este hilo de casualidad)

dec 27-06-2007 17:49:58

Hola,

Cita:

PD1: De todas maneras voy a revisar y de paso probare el codigo q me sugieres.
Pues muchas gracias. Sabe que no corre prisa ninguna en cualquier caso. :)

Cita:

PD2: Hay alguna forma de q notifiquen si responden en los hilos q uno interviene (No he buscado info sobre esto, es solo curiosidad, ya q encontre este hilo de casualidad)
Sí; entra en "tu perfil" en los Foros y dale un buen repaso a las opciones: ahora mismo no sé cuál es exactamente, pero, me consta que pueden recibirse avisos de todos los Hilos en los que participemos, cuando alguien añade un nuevo mensaje, por lo menos.

ariefez 27-06-2007 21:12:39

No hay problema, ademas tengo el codigo a la mano.

Lo acabo de revisar y lo deje como lo habia mencionado en el primer post, ya que en primer lugar si lograba ocultar el cursor, pero al abrir y cerrar los archivos multimedia o mostrar algunos forms, hacia q el cursor se mostrara nuevamente solo en el area en el cual se mostraba dicho archivo, esto pasaba de vez en cuando.

Tambien probe el procedimiento q mencionaste, es algo similar a lo q quise implementar pero tenia el problema q cuando se arrastraba una ventana este no funcionaba. lo unico q se me ocurre es tener una rutina q haga lo opuesto a ClipCursor cosa q no he buscado, ya que no es tan molestoso q el cursor se hiciera visible de vez en cuando (no es malo dejar uno q otro bug :D).

PD: Seria cosa de implementar el Truco # 414 o 415 de trucomania


La franja horaria es GMT +2. Ahora son las 06:41:38.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi