Есть класс, дочерний от TPanel, на нем располагается, в частности StringGrid. Задумка вызывать всплывающее окно для редактирования, есть процедура:
В StringGrid предусмотрена возможность редактирования, проблема в том, что когда нажимаем интер, теряется фокус и становится активной главная форма. Как исправить?
Код:
procedure TAliasEdit.createParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.Style := WS_POPUP or WS_BORDER;
Params.ExStyle := WS_EX_TOOLWINDOW;
Params.WindowClass.style := Params.WindowClass.style or CS_SAVEBITS;
end;