Ver Mensaje Individual
  #3  
Antiguo 03-06-2003
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Reputación: 10
marcoszorrilla Va por buen camino
Código:
procedure TForm1.DBCtrlGrid1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 if Key = vk_Return then
 begin
 //Si pulsan enter bajamos al siguiente control
 DBCtrlGrid1.DoKey(GkDown);
 end;
end;
Estos son los códigos:

gkNull Do nothing.
gkEditMode Toggle the EditMode property.
gkPriorTab Move to the previous panel.
gkNextTab Move to the next panel.
gkLeft Move one panel to the left.
gkRight Move one panel to the right.
gkUp Move one panel up.
gkDown Move one panel down.
gkScrollUp Move one panel up.
gkScrollDown Move one panel down.
gkPageUp Move ColCount * RowCount records up in the dataset.
gkPageDown Move ColCount * RowCount records down in the dataset.
gkHome Move to the first record in the dataset.
gkEnd Move to the last record in the dataset.
gkInsert Insert a new record prior to the current record in the dataset and set EditMode to True.
gkAppend Insert a new record at the end of the dataset and set EditMode to True.
gkDelete Delete the current record from the dataset and set EditMode to False.
gkCancel Cancel any edits not written to the dataset and set EditMode to False.


Un Saludo.
Responder Con Cita