pues facil, modifica un poco lo que te he puesto:
Código:
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;