Форум: "Основная";
Текущий архив: 2003.07.17;
Скачать: [xml.tar.bz2];

Вниз

Вставка текста в ячейку 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 вся ветка

Форум: "Основная";
Текущий архив: 2003.07.17;
Скачать: [xml.tar.bz2];

Наверх

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