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

Вниз

Компонент МЕМО   Найти похожие ветки 

 
a2618 ©   (2008-08-15 23:07) [0]

Заранее спс за ответы =)
Мне надо сделать так что бы клавиша BackSpace переставала удалять символы если от начала строки до места положения курсора осталось определленое кол-во символов.


 
{RASkov} ©   (2008-08-15 23:18) [1]

> [0] a2618 ©   (15.08.08 23:07)

Например:
На MemoOnKeyPress
if TMemo(Sender).CaretPos.X<={определленое кол-во символов} and Key=#8 then Key:=#0;


 
McSimm ©   (2008-08-15 23:38) [2]

А для чего это нужно?
Подозреваю, что этого мало, т.к. можно удалять разными способами.
От мыши или Ctrl-A,Del, например, это не защитит


 
a2618 ©   (2008-08-15 23:43) [3]

При компиляции выдает такую ошибку
[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:44) [4]

if (...) and (...) then


 
a2618 ©   (2008-08-15 23:46) [5]

А для чего это нужно?
Подозреваю, что этого мало, т.к. можно удалять разными способами.
От мыши или Ctrl-A,Del, например, это не защитит

спс что напомнил мыш надо вообще запретить.
а насчет Del я запретил клавиши up, down, left, right.


 
McSimm ©   (2008-08-15 23:49) [6]

Есть еще много...
Ctrl-A (выделяет, можно заменить)
кнопка вызова контекстного меню
Tab (при входе выделяет весь текст)


 
a2618 ©   (2008-08-15 23:50) [7]

> if (...) and (...) then
Компилица норм без ошибок но бэкспэйс всеравно пашет, даже если от начала строки 3 символа как я и поставил удаляет все что есть =(


 
Loginov Dmitry ©   (2008-08-15 23:56) [8]

> Компилица норм без ошибок но бэкспэйс всеравно пашет, даже
> если от начала строки 3 символа как я и поставил удаляет
> все что есть


Похоже, приложению сообщение посылается уже после удаления символов. Обходится хуками, но стоит ли? Используй TRichEdit.


 
Германн ©   (2008-08-15 23:56) [9]


> a2618 ©   (15.08.08 23:50) [7]
>
> > if (...) and (...) then
> Компилица норм без ошибок но бэкспэйс всеравно пашет, даже
> если от начала строки 3 символа как я и поставил удаляет
> все что есть =(
>

Извращение есть моё всё.! Но "компилица" - это перебор!


 
a2618 ©   (2008-08-15 23:58) [10]

>Германн ©   (15.08.08 23:56) [9]
>Извращение есть моё всё.! Но "компилица" - это перебор!

Иди флуди в другое место если не можеш ответить по теме!!!!!!!


 
McSimm ©   (2008-08-16 00:02) [11]

до закрытия темы осталось 2 поста :)



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

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

Наверх




Память: 0.49 MB
Время: 0.022 c
2-1219108231
Abcdef123
2008-08-19 05:10
2008.09.28
настройка среды Delphi 2007


1-1198970356
booratino
2007-12-30 02:19
2008.09.28
как смотреть дамп в hex


15-1217962116
No_Dead(w)
2008-08-05 22:48
2008.09.28
нет ли стандартной функции?(пхп)


15-1217925962
DoKi
2008-08-05 12:46
2008.09.28
рассчёт нормалей


3-1206703836
Tornado
2008-03-28 14:30
2008.09.28
Почему не правильно работает такой запрос?