El cursor no aparece hasta teclear algo.

[[Chris]]

Has probado con la propiedad ActiveControl del formulario? También puede ser que el formulario se esté activando de alguna extraña manera. No digo que seas tú que lo hagas, sino que la combinación de propiedades y código de por este pequeño inconveniente.

Saludos,
Chris

[Casimiro Noteví]

Empezado por DarkMan

Como creo que permites o pides conjeturas, se me ocurre que el problema pueda ser de algún otro programa, tal vez el antivirus, que esté jugando con focos y manejadores.
No sé, tal vez debieras comprobarlo.
Un saludo.

Sí, lo he probado sin ningún antivirus y no tengo más programas funcionando.

Empezado por Luis M.

Hola.
Pues yo también me encuentro en la misma situación.
Trabajo con D2007 y S.O. XP
Para disimularlo un poco y que el usuario no se encuentre un poco perdido,
le cambio el color al componente (clAqua) cundo tiene el foco y (clWindows) cuando pierde el foco.
Un saludo.

Esa solución es la que había pensado, pero tendría que cambiarlo en todo el programa y no sé si meterme en esos "berenjenales".

Empezado por Chris

Has probado con la propiedad ActiveControl del formulario? También puede ser que el formulario se esté activando de alguna extraña manera. No digo que seas tú que lo hagas, sino que la combinación de propiedades y código de por este pequeño inconveniente.
Saludos,
Chris

Sí, el activecontrol tiene el componente correcto, ya digo, se puede teclear y aparece en el control oportuno, el "único" problema es que no aparece el cursor hasta que se pulsa alguna tecla.
Lo que me extraña mucho es que ocurra en algunas ventanas/formularios y en otras no, cuando todas heredan de la misma "plantilla" que uso, un simple form con un panel y una toolbar con 2 botones, aceptar y salir.

[[Al González]]

Para ayudar a la estadística, a mí me ha sucedido sobre Windows XP en aplicaciones compiladas con Delphi 7.

[ecfisa]

Hola Casimiro.

Nunca me sucedió, pero si el problema se soluciona presionando una tecla... ¿ Que tal esta chapuzeada ?

Código Delphi [-]
procedure TForm1.FormActivate(Sender: TObject);
begin 
 // Cualquier tecla que no tenga consecuencias... 
 keybd_event(VK_LCONTROL,0,0,0);
 keybd_event(VK_LCONTROL,0,2,0);
end;

Un saludo.

[Casimiro Noteví]

Sí, también he probado a simular pulsaciones de teclas... y pasar el foco al siguiente y volver al anterior... y varias "chapuzas" más, pero nada.