Validar/Grabar linea de un DBGrid con Enter

[Casimiro Noteví]

pues facil, modifica un poco lo que te he puesto:

 procedure Tform1.grArticulosKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
 var	iCol : Integer;
 begin
 	if key = VK_RETURN then
 	begin
 		iCol := TDrawgrid(grArticulos).Col;
 		//iCol := grArticulos.SelectedIndex;
 		//iCol := grArticulos.SelectedField.FieldNo;
 		if iCol = iLastColumn then
 			  ...hacerloquesea...
 	end;
 end;