DBGrid no tiene nada asignado

[ReiCk_Z]

Cordial saludo a los miembros del club.
Espero que me puedan ayudar con la siguiente inquietud.
Tengo un DBGrid que le asigno una consulta sin ningún problema, cuando ejecuto la consulta el DBGrid me carga la información sin problemas.
El problema está cuando trato de acceder a la información que contiene el DBGrid, me sale que no tiene nada asignado. Pero si vuelvo a ejecutar la consulta por segunda vez ya no pone problema. Hasta el momento de esta manera he pasado por alto este impase, pero me gustaría saber a que se debe y como solucionarlo.

Código Delphi [-]
procedure TFMenu.DBGrid5_1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 try
  if Key = VK_RETURN then
  begin
  if Assigned(DBGrid5_1.Fields[1]) then   // Al realizar este chequeo me devuelve False *
  begin                                                     
    if DBGrid5_1.SelectedField.FieldName = DM1.Q5_9.Fields[0].FieldName then
    begin
      Edit5_01.Text := DBGrid5_1.Fields[1].AsString;
    end;
  end;

*Resalto que puedo ver la información en el DBGrid pero al realizar este paso devuelve False

Les agradezco mucho la ayuda que me puedan brindar.