Ctrl+C Ctrl+V

Sergey Karnaukhov

unread,

Aug 15, 2001, 5:04:23 AM8/15/01

to

Здравствуй уважаемый All.

Такую задачу хочется решить:
при выделении юзером в обычном
EditBox`e текста перехватить Ctrl+C,
и изменить этот текст перед вставкой
проконтролировав его правильность например.
А Ctrl+C как впрочем и Ctrl+V событие KeyPress
не возбуждает. Че делать ?

Сергей Карнаухов.

Alex Shustikov

unread,

Aug 15, 2001, 5:26:43 AM8/15/01

to

> Такую задачу хочется решить:
> при выделении юзером в обычном
> EditBox`e текста перехватить Ctrl+C,
> и изменить этот текст перед вставкой
> проконтролировав его правильность например.
> А Ctrl+C как впрочем и Ctrl+V событие KeyPress
> не возбуждает. Че делать ?

Привет
Очень невизуальнофоксовский способ

editbox.gotfocus
ON KEY LABEL ctrl-c DO MyProc

editbox.lostfocus
ON KEY LABEL ctrl-c

Alex

Valentin Jarichevsky

unread,

Aug 15, 2001, 5:48:53 AM8/15/01

to

Alex Shustikov поспешил дать совет

> Очень невизуальнофоксовский способ
>
> editbox.gotfocus
> ON KEY LABEL ctrl-c DO MyProc
>
> editbox.lostfocus
> ON KEY LABEL ctrl-c

Привет, Алекс!
Дело в том, что не будет работать занесение в буфер _cliptext выделенного
текста, а будет только переход на myProc. И задача переходит в другую
плоскость - как взять выделенный текст (например, как его поместить в
переменную).
C уважением. Валентин Ярычевский.

Alex Shustikov

unread,

Aug 15, 2001, 6:25:16 AM8/15/01

to

> Дело в том, что не будет работать занесение в буфер _cliptext выделенного
> текста, а будет только переход на myProc. И задача переходит в другую
> плоскость - как взять выделенный текст (например, как его поместить в
> переменную).

ааааааааа.
я что-то подобное когда-то делал, но не особо мудрствуя добавил в меню еше
один пункт со своим шоткатом
Скажем, Ctrl-C так же и работает- засовывает текст в клипбоард (_cliptext),
а какая-то новая комбинация клавиш, работает как нужная вставка, например
_cliptext = upper(_cliptext)
KEYBOARD '{CTRL-V}'

Либо наоборот, новый шоткат генерит KEYBOARD '{CTRL-C}' и затем обрабатывает
его нужным образом

Только что пришел в голову вижуалфоксовский вариант!!! ;o)
У editbox (и у texbox тоже) есть
SelStart
SelLength
SetText
и назначай любые незадействованные в меню клавиши в KeyPressed

Alex

Sergey Titow

unread,

Aug 15, 2001, 6:41:34 AM8/15/01

to

Привет, Валентин!

"Valentin Jarichevsky" <V.Jari...@VAZ.RU> сообщил/сообщила в новостях
следующее: news:9ldgek$s9e$1...@u250.vaz.ru...

> Дело в том, что не будет работать занесение в буфер _cliptext выделенного
> текста, а будет только переход на myProc. И задача переходит в другую
> плоскость - как взять выделенный текст (например, как его поместить в
> переменную).

У боксов есть проперти SelStart, SelLength и SelText...

--
Успехов,
Сергей Титов

Valentin Jarichevsky

unread,

Aug 15, 2001, 6:59:48 AM8/15/01

to

Sergey Titow подсказывает

> > Дело в том, что не будет работать занесение в буфер _cliptext
выделенного
> > текста, а будет только переход на myProc. И задача переходит в другую
> > плоскость - как взять выделенный текст (например, как его поместить в
> > переменную).
> У боксов есть проперти SelStart, SelLength и SelText...

Привет всем!
То есть можно выкрутиться, анализируя SelText в процедуру myProc по способу,
предложенному Алексеем(андром) Шустиковым.
С уважением. Валентин Ярычевский.

Sergey Karnaukhov

unread,

Aug 15, 2001, 10:04:16 AM8/15/01

to

"Valentin Jarichevsky" <V.Jari...@VAZ.RU> wrote in message
news:9ldkj0$6i9$1...@u250.vaz.ru...

> > > Дело в том, что не будет работать занесение в буфер _cliptext
> выделенного
> > > текста, а будет только переход на myProc. И задача переходит в другую
> > > плоскость - как взять выделенный текст (например, как его поместить в
> > > переменную).
> > У боксов есть проперти SelStart, SelLength и SelText...
>
> Привет всем!
> То есть можно выкрутиться, анализируя SelText в процедуру myProc по
способу,
> предложенному Алексеем(андром) Шустиковым.

Спасибо за то что подсказали очередное хитроумное
извращение :-). Сколько же их еще будет ...

Сергей Карнаухов.