El único caso en que a este código le veo sentido, es que se ejecute un código cuando se cambia de Fila (aunque no puedo verlo por ese código):
Código Delphi
[-]
self.ListaPedido.SetFocus;
MiRow := ListaPedido.Row;
self.ListaPedido.Row := 2;
self.ListaPedido.Row := MiRow;
Además tienes 2 SetFocus, sería mejor dejar el último.
La última vez que usé ese control, tuve que dejar una fila vacia siempre abajo del todo, no es nada elegante esa solución, pero me estaba volviendo loco fallos del tipo "Grid index out of range" (no quise dedicarle más tiempo a un Freeware
![Wink](http://www.clubdelphi.com/foros/images/smilies/wink.gif)
).
"Cannot focus a disables or invisible window" este es otro error distinto, lo que vien a decir, es que la ventana que debe salir al hacer doble clic :
- ya se encuentra creada pero está invisible (visible a false). Revisa Project ->Options y quita esa ventana de AutoCreateForms y pasala a Available, despues tendrás que crearla a mano .... por ejemplo:
Código Delphi
[-]
procedure TMain.Button1click(...);
begin
Application.CreateForm(Tform1, form1);
Form1.ShowModal
end;
procedure TForm1.FormClose(...);
begin
action := cafree;
Form1:= nil;
end;
- O bien se trata de una ventana mdichild y no puede usarse ShowModal
Saludos