Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 99

/ вопрос открыт /

Здравствуйте!
Как можно нажатием на кнопку вставить какой-нибудь текст в нужное место уже имеющегося текста в memo.
Проще говоря, мне нужно организовать что-то типо системы форматирования текста phpBB или IPB, только в программе. :)
Как я понял, нужно оперировать со свойствами
SelStart, SelEnd и SelLength. Но вот дальше додумать не могу. (:
Походу, надо узнать ещё номер строки, в которой курсор стоит, а затем оперировать с copy delete и length.
Но вот что-то торможу... :)

А может вообще как-то подругому можно сделать???
_____
Заранее, спасибо!!!

Евгений В Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: Евгений В (статус: 1-ый класс)
Вопрос отправлен: 12 августа 2006, 03:37
Состояние вопроса: открыт, ответов: 2.

Ответ #1. Отвечает эксперт: Geron

Здравствуйте, Евгений В! Я сейчас вам напишу маленькое приложение, а вы извлекайте нужные вам части кода.
У нас есть Memo, Button, Edit.
Мы щелкаем мышкай по нужной строчке в Мемо, нужная строчка показывается в Edit, мы изменям текст в Edit и нажимаем на кнопку, после этого нужная строчка изменяется в Мемо.
С полученной строчкой из Мемо можно работать как и обычной строкой.

Приложение:
  1.  
  2. procedure TForm1.Memo1MouseDown(Sender: TObject; Button: TMouseButton;
  3. Shift: TShiftState; X, Y: Integer);
  4. begin
  5. Edit1.Text:=Memo1.Lines.Strings[Memo1.CaretPos.Y];
  6. end;
  7.  
  8. procedure TForm1.Button1Click(Sender: TObject);
  9. begin
  10. Memo1.Lines.Strings[Memo1.CaretPos.Y]:=edit1.text;
  11. end;


Ответ отправил: Geron (статус: 1-ый класс)
Время отправки: 13 августа 2006, 01:28
Оценка за ответ: 5

Комментарий к оценке: Спасибо!!!
Вот оно, что мне надо Memo1.CaretPos.Y

Ответ #2. Отвечает эксперт: Косолапов Дмитрий Юрьевич

Вообще-то должно быть свойство SelText... Им и оперировать?

Ответ отправил: Косолапов Дмитрий Юрьевич (статус: 8-ой класс)
Время отправки: 13 августа 2006, 11:16
Оценка за ответ: 4


Мини-форум вопроса

Всего сообщений: 1; последнее сообщение — 11 августа 2006, 01:34; участников в обсуждении: 1.
Евгений В

Евгений В (статус: 1-ый класс), 11 августа 2006, 01:34 [#1]:

Никто не знает???
Ну помогите кто-нибудь!

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 30 мая 2023, 08:34
Выполнено за 0.02 сек.
Рейтинг@Mail.ru