Скачать: CL | DM;

Вставка текста в ячейку TStringGrid   Найти похожие ветки 

← →
Navi ©   (2003-07-06 22:52) [0]

Здравствуйте!
Есть экземпляр TStringGrid, ячейка находится в режиме редактирования, текстовый курсор где-то в середине текста-содержимого ячейки. Как вставить (не из буфера) какой-либо текст в текущию позицию в ячейке?
Спасибо.

---

← →
Ученик ©   (2003-07-07 00:13) [1]

type
TStringGridAccess = class(TStringGrid);

procedure TForm1.Button3Click(Sender: TObject);
begin
if StringGrid1.EditorMode then
SendMessage(TStringGridAccess(StringGrid1).InplaceEditor.Handle, EM_REPLACESEL, 0, Integer(PChar("MyText")))
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.016 c