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

Memo   Найти похожие ветки 

← →
ehri ©   (2003-07-29 15:58) [0]

Вопрос №1. Есть компонент Memo1, и есть кнопка. Как сделать, чтобы по нажатию кнопки внутрь текста Memo, добавлялся новый текст, как бы раздвигающий исходный текст?
Вопрос №2. Мой предыдущий топ удалили, или его не было??

---

← →
Polevi ©   (2003-07-29 16:02) [1]

TStrings.Insert

---

← →
ehri ©   (2003-07-29 16:04) [2]

А как вытащить позицию курсора? :(

---

← →
ELKa   (2003-07-29 16:05) [3]

procedure TForm.Button2Click(Sender: TObject);
begin
memo1.selstart:=позиция с которой нужно вставить текст (целое число);
memo1.seltext:=текст;
end;

---

← →
ELKa   (2003-07-29 16:07) [4]

memo1.selstart - это и есть текущая позиция курсора.

---

← →
ehri ©   (2003-07-29 16:07) [5]

Ё... Как вытащить позицию курсора в виде переменной типа Integer?

---

← →
ehri ©   (2003-07-29 16:07) [6]

Спасибо

---

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

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



Память: 0.46 MB
Время: 0.01 c