Редактирование ячеек в dbgridEh

[ifreestyler]

Всем привет!
Возникла такая проблема с dbgridEh. Чтобы отредактировать ячейку нужно два раза кликнуть по ней, а чтобы выйти из режима редактирования нужно кликнуть на соседнюю ячейку или нажать enter. Но вот если кликнуть в любое пустое место грида то ячейка так и остается в режиме редактирования.
Может кто то подскажет как завершать редактирование если кликнуть на любое пустое место грида?

[kropotkina-alice]

DBGridEx не использую.
Вот вариант для простого DBGrid:

procedure TForm1.DBGrid1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
if DBGrid1.DataSource.State=dsEdit then
DBGrid1.DataSource.DataSet.Post;
DBGrid1.EditorMode:=False;
end;

[ifreestyler]

Огромное спасибо! Немного модернизировал код и всё заработало как надо. Пришлось добавить проверку, что кликаю на пустое место грида, а не на ячейку, иначе при клике режим редактирования сразу выключался, не давай войти в него.
Кому интересно выкладываю код:

var
  cc,rr:integer;  
begin
  TCustomDrawGridEh(dbgrdh3).MouseToCell(x,y,cc,rr);
  if (cc = -1) and (rr = -1 ) and (dbgrdh3.EditorMode = true) then begin
    try
      if dbgrdh3.DataSource.DataSet.State in [dsEdit, dsInsert] then dbgrdh3.DataSource.DataSet.Post;
    except
    end;
    dbgrdh3.EditorMode := false;
  end;
end;

[kropotkina-alice]

Сообщение от ifreestyler

Пришлось добавить проверку, что кликаю на пустое место грида, а не на ячейку, иначе при клике режим редактирования сразу выключался, не давай войти в него.

Это совершенно лишнее.
Редактирование включается автоматом, когда вы начинаете изменять содержимое ячейки.
Можете проверить...

[Аватар]

Там просто при клике на заголовки колонок без проверки на -1 проблемки будут, а так Ok. При клике на рабочей ячейке это событие по моему вообще не происходит, но это good

[ifreestyler]

Редактирование включается автоматом, когда вы начинаете изменять содержимое ячейки.

Не спорю..Но если на onMouseDown повесить событие где мы делаем

dbgrdh3.EditorMode := false;

то в режим редактирования мы в принципе попасть не можем, потому что не успев войти мы из него выходим.

[kropotkina-alice]

Это ваши теоретические изыски. А попробовать реально вы так и не решились?
Вот нормально работает этот обработчик, хоть ты тресни!

procedure TForm1.DBGrid1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
if DBGrid1.DataSource.State in [dsEdit,dsInsert] then
DBGrid1.DataSource.DataSet.Post;
DBGrid1.EditorMode:=False;
end;

И спокойно я редактирую в любой ячейке...
С чего вы взяли, что "в режим редактирования мы в принципе попасть не можем, потому что не успев войти мы из него выходим"???
Или вы определяете возможность редактирования исключительно по индикатору???

[ifreestyler]

Попробовать на DbGrid я не решился, да)
Но на DbGridEh не прокатило..чтобы отредактировать ячейку надо двойной клик сделать и тогда DBGrid1.EditorMode становится True, но отрабатывает событие MouseDown и ставит EditorMode в False.
Если поставить begin после Then чтобы обе строки отрабатывали только при dsEdit тогда другое дело. Хотя и это не помогло мне и пришлось извращаться дальше.
Главное что Вы меня вывели на правильный путь и за это спсибо!