Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.013 c