[dima_k]

Есть форма. На ней

Код:

    DBGrid1: TJvDBUltimGrid; 
    BtnOK: TBitBtn;
    BtnCancel: TBitBtn;
у грида в событии OnDblClick:
procedure TFormListSet.DBGrid1DblClick(Sender: TObject);
begin
  BtnOK.Click;
end;

Админ: Пользуемся тегами при оформлении кода!

форма вызывается модально.
если кликать по BtnOK - форма нормально закрывается.
А если DblClick по гриду - "cannot focus a disabled or invisible window"

попробовал:
1. ModalResult:=mrOk;
2.BtnOK.SetFocus;
keybd_event(VK_RETURN,0,0,0);

все равно ошибка.

Если при фокусе на гриде нажать Enter - все нормально

Может кто чего подскажет?
Спасибо.

[dr. F.I.N.]

Программно где-либо меняете состояние кнопки BtnOK (видимость/Visible, доступность/Enabled)? Может при каких-то условиях кнопка недоступна (Enabled = False)?

[dima_k]

с более старой версией jedi нормально заработало

[Guaho]

Не нужно вызывать обработчик кнопки. Сделайте так:

Код:

procedure TFormListSet.DBGrid1DblClick(Sender: TObject);
begin
  FormListSet.Close;
end;