El cursor no aparece hasta teclear algo.

[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.