Foco a dbgrid

[[newtron]]

Hola, prueba con esto

Código Delphi [-]
DBGrid1.Columns[1].Field.FocusControl;

Saludos

[jafera]

Gracias newtron.

Así no da error, pero el primer registro me queda como bloqueado y no puedo acceder a el, tengo que pasar al segundo y luego regresar al primero.

Saludos

[ecfisa]

Hola Josep.

Otra opción:

Código Delphi [-]
procedure TF_EntradaPuntuacions.PageControl1Change(Sender: TObject);
begin
  if PageControl1.ActivePage = TabSheet1 then
    with DBGrid1 do
    begin
      SetFocus;
      SelectedField :=  DataSource.DataSet.FieldByName('Volta_1PUNTS');
      EditorMode := True; // (si deseas que quede listo para editar)
    end;
end;

Saludos

[jafera]

Gracias Ecfisa.

No me funciona, sigo con el problema, ahora me dice Volta_1PUNTS filed not found, cierro el mensaje y puedo continuar el trabajo.
Si quito Volta_1 y dejo PUNTS solo, se queda como antes con el primer registro bloqueado.

Seguimos intentando

Saludos

Josep

[ecfisa]

Empezado por jafera

...me dice Volta_1PUNTS field not found,

Hola Josep.

Ese error indica que no existe un campo llamado "Volta_1PUNTS", yo sólo lo tomé de tu primer mensaje a modo de ejemplo, me es imposible saber el nombre que le han dado.

Revisa que nombre tiene el mismo en la bd y cambia a "Volta_1PUNTS" por el nombre correcto. Si deseas visualizarlos para asegurarte, agrega un TListBox al form y este código en el evento OnClick de un TButton:

Código Delphi [-]
procedure TF_EntradaPuntuacions.btnShowFieldNamesClick(Sender: TObject);
var
  i: Integer;
begin
  for i := 0 to DBGrid1.Columns.Count-1 do
    ListBox1.Items.Add(Format('Column: %d - FieldName: %s',
      [i, DBGrid1.Columns[i].FieldName]));
end;

Saludos

[jafera]

Hola de nuevo.

El campo se llama PUNTS a secas, ya lo he comprobado y colocando el nombre así 'PUNTS', el resultado es lo que me pasaba antes, el foco se va a la columna 1 (campo PUNTS) pero se queda congelado, adjunto imagen, luego hago click en cualquier campo del grid y ya puedo acceder a la columna en cuestión.
Lo que me gustaría conseguir es que una vez seleccionados los criterios dorsal y vuelta el cursor se colocara directamente en el grid y me dejara entrar los puntos directamente, por automatizar el sistema.

Saludos y gracias a todos

Josep

[ecfisa]

Hola Josep.

Ahora que ya corregiste el nombre del campo, no sé que puede estar sucediendo... El código lo he probado y funciona correctamente, posicionándose en la columna que se le indique y listo para editar.

Lamentablemente la imagen que subiste es demasiado pequeña como para apreciar lo que mencionas.

Saludos