Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.25;
Скачать: CL | DM;

Вниз

Как в Memo вставить текст при нажатии...   Найти похожие ветки 

 
Help   (2002-07-13 20:02) [0]

Значит так: есть кнопка, memo с текстом. Щелкаю скажем в середине мемо и нажимаю на кнопку. Должно вставить текст.Как но без буфера


 
Viewer   (2002-07-13 20:08) [1]

???
memo.Lines.Text := "qwerty";


 
Help   (2002-07-13 20:52) [2]

Viewer я же просил чтобы старый текст не меняло, а вставило в позицию курсора!!!


 
Help   (2002-07-13 20:57) [3]

Все равно что в блокноте щелкнуть правой кнопкой и нажать вставить!!!


 
Anatoly Podgoretsky ©   (2002-07-13 21:44) [4]

Для строк есть процедура Insert, свойство Text именно строкового типа


 
Юрий Зотов ©   (2002-07-14 00:13) [5]

Можно и через Insert(Text, ...), но возникнут дополнительные проблемы с определением позиции вставки - да еще с учетом всех #10#13.

Проще выставить SelLength=0 (хотя можно и этого не делать, но для подстраховки), а затем послать EM_REPLACESEL. А SelStart при щелчке выставится само собой.


 
Anatoly Podgoretsky ©   (2002-07-14 00:36) [6]

Конечно, я просто комментировал вставку через свойство Text, естественно это не оптимально


 
Случайный прохожий   (2002-07-14 12:17) [7]

Если суммировать вышесказанное, то:

procedure TForm2.Button1Click(Sender: TObject);
begin
Memo1.SelText:=TButton(Sender).Caption;
end;



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

Текущий архив: 2002.07.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.01 c
14-81469
igorr
2002-06-28 12:25
2002.07.25
Программисты


3-81123
AFROLOV
2002-07-03 11:11
2002.07.25
как узнать сколько записей удовлетворяют фильтру для Dataset


3-81175
Digitman
2002-07-03 15:06
2002.07.25
Черт-те что происходит непонятное ... и Кузьменко молчит(


14-81418
mcs
2002-06-27 09:48
2002.07.25
Свен Шрайбер


3-81186
RDA
2002-07-04 13:12
2002.07.25
DBTreeList и FBPlus проблемы с удалением