![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Форумчанин
Регистрация: 10.10.2008
Сообщений: 123
|
![]()
Не могу додуматься! Подскажите! Вот сама задача!
В редактор Memo исходно вводится текст из нескольких строк. Флажок разрешает/запрещает дополнять строки в редакторе.
|
![]() |
![]() |
![]() |
#2 |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,543
|
![]()
что надо
1. полностью запретить ввод(редакцию) readonly 2. запретить редакцию всех строк кроме последней. carretpos onkeypress selstart 3. другой вариант ....
программа — запись алгоритма на языке понятном транслятору
|
![]() |
![]() |
![]() |
#3 |
Форумчанин
Регистрация: 10.10.2008
Сообщений: 123
|
![]()
К примеру вводим в редактор Memo 3 строки. А если поставим флажок (checked = True), то ввод следующей 4 строки невозможен! Если уберем флажок (checked = False), то ввод 4 строки возможен.
Последний раз редактировалось StudentMarat; 13.03.2010 в 15:11. |
![]() |
![]() |
![]() |
#4 |
Форумчанин
Регистрация: 21.10.2008
Сообщений: 337
|
![]() Код:
|
![]() |
![]() |
![]() |
#5 |
Форумчанин
Регистрация: 10.10.2008
Сообщений: 123
|
![]()
А если полностью запретить ввод(редакцию) readonly как предлагает evg_m то исходный код как будет выглядить?
|
![]() |
![]() |
![]() |
#6 |
Форумчанин
Регистрация: 21.10.2008
Сообщений: 337
|
![]() Код:
![]() |
![]() |
![]() |
![]() |
#7 |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,543
|
![]()
procedure TForm1.CheckBox1Click(Sender: TObject);
begin if checkbox1.Checked then memo1.readonly:=true;//здесь нет возврата в режим доступной редакции end; Код:
программа — запись алгоритма на языке понятном транслятору
Последний раз редактировалось evg_m; 13.03.2010 в 15:46. |
![]() |
![]() |
![]() |
#8 |
Форумчанин
Регистрация: 10.10.2008
Сообщений: 123
|
![]()
С этим разобрался. Есть ещё одна задача.
В редактор Memo исходно ввводится текст из нескольких строк. В отдельное окно вводится слово. Программа определяет в тексте строку, которая содержит максимальное количество символов, принадлежащих слову. Эта строка выводится на кнопку, запускающую анализ. Последний раз редактировалось StudentMarat; 13.03.2010 в 15:58. |
![]() |
![]() |
![]() |
#9 |
Форумчанин
Регистрация: 21.10.2008
Сообщений: 337
|
![]()
evg_m, вы правы, я забыл кое-что добавить:
Код:
StudentMarat, что значит в отдельное окно? |
![]() |
![]() |
![]() |
#10 |
Форумчанин
Регистрация: 10.10.2008
Сообщений: 123
|
![]()
т.е в редактор edit
|
![]() |
![]() |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Высота строки в Memo | Maxs | Общие вопросы Delphi | 2 | 09.12.2009 12:35 |
memo поиск и перенос строки | andrey poki | Общие вопросы Delphi | 4 | 22.03.2009 06:54 |
Удаление конкретной строки Memo | JakSon | Общие вопросы Delphi | 6 | 03.03.2008 09:35 |
Удалить из Memo повторяющиеся строки | Etar | Компоненты Delphi | 2 | 28.06.2007 18:34 |