![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Компонент МЕМО [D7, XP]
a2618 © (2008-08-15 23:07:00)Заранее спс за ответы =)
Мне надо сделать так что бы клавиша BackSpace переставала удалять символы если от начала строки до места положения курсора осталось определленое кол-во символов.
McSimm (2008-08-16 00:02:00) [1]до закрытия темы осталось 2 поста :)
a2618 (2008-08-15 23:58:00) [2]>Германн © (15.08.08 23:56) [9]
>Извращение есть моё всё.! Но "компилица" - это перебор!
Иди флуди в другое место если не можеш ответить по теме!!!!!!!
Loginov Dmitry (2008-08-15 23:56:00) [3]> Компилица норм без ошибок но бэкспэйс всеравно пашет, даже
> если от начала строки 3 символа как я и поставил удаляет
> все что есть
Похоже, приложению сообщение посылается уже после удаления символов. Обходится хуками, но стоит ли? Используй TRichEdit.
Германн (2008-08-15 23:56:00) [4]
> a2618 © (15.08.08 23:50) [7]
>
> > if (...) and (...) then
> Компилица норм без ошибок но бэкспэйс всеравно пашет, даже
> если от начала строки 3 символа как я и поставил удаляет
> все что есть =(
>
Извращение есть моё всё.! Но "компилица" - это перебор!
a2618 (2008-08-15 23:50:00) [5]> if (...) and (...) then
Компилица норм без ошибок но бэкспэйс всеравно пашет, даже если от начала строки 3 символа как я и поставил удаляет все что есть =(
McSimm (2008-08-15 23:49:00) [6]Есть еще много...
Ctrl-A (выделяет, можно заменить)
кнопка вызова контекстного меню
Tab (при входе выделяет весь текст)
a2618 (2008-08-15 23:46:00) [7]А для чего это нужно?
Подозреваю, что этого мало, т.к. можно удалять разными способами.
От мыши или Ctrl-A,Del, например, это не защитит
спс что напомнил мыш надо вообще запретить.
а насчет Del я запретил клавиши up, down, left, right.
McSimm (2008-08-15 23:44:00) [8]if (...) and (...) then
a2618 (2008-08-15 23:43:00) [9]При компиляции выдает такую ошибку
[Error] dh.pas(52): Operator not applicable to this operand type
if TMemo(Sender).CaretPos.X<=3 and Key=(суда ставит курсор)#8 then Key:=#0;
McSimm (2008-08-15 23:38:00) [10]А для чего это нужно?
Подозреваю, что этого мало, т.к. можно удалять разными способами.
От мыши или Ctrl-A,Del, например, это не защитит
{RASkov} (2008-08-15 23:18:00) [11]> [0] a2618 © (15.08.08 23:07)
Например:
На MemoOnKeyPress
if TMemo(Sender).CaretPos.X<={определленое кол-во символов} and Key=#8 then Key:=#0;