Как программно перевести DBGrid в режим редактирования

Previous  Top  Next

    
 

 

Переведите таблицу в режим редактирования, затем получите дескриптор (handle) окна редактирования и перешлите ей сообщение EM_SETSEL. В качестве параметров вы должны переслать начальную позицию курсора, и конечную позицию, определяющую конец выделения текста цветом. В приведенном примере курсор помещается во вторую позицию, текст внутри ячейки не выделяется.

Code:

procedure TForm1.Button1Click(Sender: TObject);

var

      h : THandle;

begin

      Application.ProcessMessages;

      DbGrid1.SetFocus;

      DbGrid1.EditorMode := true;

      Application.ProcessMessages;

      h:= Windows.GetFocus;

      SendMessage(h, EM_SETSEL, 2, 2);

end;

 

 

 

©Drkb::03054

       

Взято с http://delphiworld.narod.ru