Запретить вставку текста в TEdit из буфера обмена через Ctrl+V или через контекстное меню

@Alexei1977 · Регистрация: 05.03.2010

Добрый день!
Есть такой вопрос: Что нужно сделать, чтобы в TEdit не было возможности вставить текст из буфера обмена при помощи CTRL+V или через выпадающее меню <Вставить>?

@Lord_Voodoo · 23.04.2010, 10:12

Alexei1977, запрети в OnKeyUp или OnKeyDown эту комбинацию

@Alexei1977 · 23.04.2010, 10:25 **[ТС]**

Если не сложно, можно на примере?

@uggway · 23.04.2010, 10:34

Чтобы избавиться от выпадающего меню можно бросить на форму пустой TPopupMenu и присвоить его к нужному TEdit, тогда у него не будет выпадающего меню. А от Ctrl+v в обработчике нажатия кнопки onKeyPress (в onKeyUp/onKeyDown не получится):

C++

void __fastcall TForm1::Edit2KeyPress(TObject *Sender, char &Key)
{
    if(Key == 22)Key = 0;
}

@Alexei1977 · 23.04.2010, 10:49 **[ТС]**

uggway,
Этот способ я пробовал, а более демократичного нет (PopupMenu).

@Lord_Voodoo · 23.04.2010, 11:03

попробуй так(но это забивается ctrl+V):

C++

void __fastcall TForm1::Edit2KeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
   if(Shift.Contains(ssCtrl) && (Key == 'v' || Key == 'V')){
     Edit2->ReadOnly = true;
   }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Edit2Enter(TObject *Sender)
{
   Edit2->ReadOnly = false;
}
//---------------------------------------------------------------------------

а так убиваем меню всплывающее:

C++

void __fastcall TForm1::Edit2ContextPopup(TObject *Sender,
      TPoint &MousePos, bool &Handled)
{
  Handled = true;
}

@Alexei1977 · 23.04.2010, 11:31 **[ТС]**

Всем спасибо. Вроде всё ОК!!!

@Maikl Til · 23.04.2010, 12:16

Не успел =)))) Ну все равно кину )))

C++

void __fastcall TForm1::Edit1KeyPress(TObject *Sender, wchar_t &Key)
{
if(GetKeyState(VK_CONTROL)<0)
{
 Key = 0; //CTRL не выполняет действий
}
}

@Alexei1977 1 / 1 / 0 Регистрация: 05.03.2010 Сообщений: 24
		1
	Запретить вставку текста в TEdit из буфера обмена через Ctrl+V или через контекстное меню 23.04.2010, 09:46. Просмотров 1610. Ответов 7 Метки нет (Все метки) Добрый день! Есть такой вопрос: Что нужно сделать, чтобы в TEdit не было возможности вставить текст из буфера обмена при помощи CTRL+V или через выпадающее меню <Вставить>? 0

@Lord_Voodoo Супер-модератор 8745 / 2470 / 140 Регистрация: 07.03.2007 Сообщений: 11,739
	23.04.2010, 10:12	2
	Alexei1977, запрети в OnKeyUp или OnKeyDown эту комбинацию 0

@Alexei1977 1 / 1 / 0 Регистрация: 05.03.2010 Сообщений: 24
	23.04.2010, 10:25 [ТС]	3
	Если не сложно, можно на примере? 0

@Alexei1977 1 / 1 / 0 Регистрация: 05.03.2010 Сообщений: 24
	23.04.2010, 10:49 [ТС]	5
	uggway, Этот способ я пробовал, а более демократичного нет (PopupMenu). 0

@Alexei1977 1 / 1 / 0 Регистрация: 05.03.2010 Сообщений: 24
	23.04.2010, 11:31 [ТС]	7
	Всем спасибо. Вроде всё ОК!!! 0

Опции темы