procedure TFm_Select.dbg_xkzhKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
  begin
  if key =13 then
    main.Txkzh.Text:=FM_select.dxDBGrid1.FocusedNode.Values[1];
    main.Label5.Caption:=FM_select.dxDBGrid1.FocusedNode.Values[2];
    fm_select.Close;
end;按任何键,fm_select都CLOSE掉了!!
怎么回事啊??