Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Компонент МЕМО [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;


Наверх

Титульная страница Поиск, карта сайта Написать письмо