Jak zablokować wciśnięcie klawisza?

[kurczez]

Hej, chciałbym aby TMemo nie reagowało na naciśnięcie wybranego klawisza. Np. gdy nacisnę na "a" to wbija się "a", ale gdy nacisnę na zablokowany klawisz "b" to nie zostanie od wpisany.
Coś czuje, że trzeba przechwycić komunikaty klawiatury z WinApi i je jakoś zablokować, ma ktoś jakieś sugestie?

[Cyfrowy Baron]

Możesz posłużyć się zdarzeniem OnKeyPress dla obiektu Memo.

Ponieważ nie uzupełniłeś swojego profilu, więc nie wiem w jakim środowisku programujesz dlatego podaję kod dla środowiska C++Builder 2009 i 2010:

Kod: Zaznacz cały

//---------------------------------------------------------------------------
void __fastcall TForm1::Memo1KeyPress(TObject *Sender, wchar_t &Key)
{
   wchar_t keyString[3];
   keyString[0] = Key;
   wcscpy(&keyString[1], L"b");
   wcscpy(&keyString[2], L"e");

   for(int i = 1; i < sizeof(keyString)/2; i++)
   {
    if(Key == keyString[i]) Key = NULL;
   }
}
//---------------------------------------------------------------------------


Zablokowane zostaną litery b B e E, gdyż wielkość liter nie gra tutaj roli. Rozmiar zmiennej keyString został ustawiony na 3, gdyż tylko trzy litery ma przechowywać, ustal ten rozmiar w zależności od liczby blokowanych liter, czyli rozmiar = liczba blokowanych liter + 1;

[kurczez]

Dzięki, działa ale są problemy z pl znakami typu ł, ś.

Edit: uzupełniłem profil, używam Turbo C++ pro.

[Cyfrowy Baron]

Jak pisałem, to kod dla C++Builder 2009 i 2010, dla Turbo C++ pewnie powinno być tak jak dla wcześniejszych wersji C++Builder'a, czyli trzeba zastąpić typ wchar_t typem char, gdyż jak zauważysz wartość Key argumentu funkcji OnKeyPress jest typu char:

Kod: Zaznacz cały

void __fastcall TForm1::Memo1KeyPress(TObject *Sender, char &Key)
{
    char keyString[3];
    keyString[0] = Key;
    strcpy(&keyString[1], "ł");
    strcpy(&keyString[2], "ś");

    for(unsigned i = 1; i < sizeof(keyString); i++) /* sizeof(keyString) a nie sizeof(keyString)/2 */
    {
      if(Key == keyString[i]) Key = NULL;
    }   
}


[kurczez]

Zgadza się, jest typu char, ale nadal nie działa.

Na ifie zmienne mają wartości:

Key = '\x01'
keyString[i] = ł

Kod: Zaznacz cały

    char keyString[3];
   keyString[0] = Key;
   strcpy(&keyString[1], "ł");
   strcpy(&keyString[2], "ś"); // Po wykonaniu tej linijki kodu zmienna Key zmienia wartość z "f" na '\x01' :|

   for(unsigned i = 1; i < sizeof(keyString); i++) /* sizeof(keyString) a nie sizeof(keyString)/2 */
   {
     if(Key == keyString[i]) Key = NULL;
   }   

[Cyfrowy Baron]

A na pewno umieściłeś ten kod w zdarzeniu OnKeyPress a nie w zdarzeniu OnKeyDown lub OnKeyUp?

[kurczez]

Tak, sprawdzałem 2 razy.
Przeczytaj mój komentarz w wklejonym kodzie, dzieje tam się coś dziwnego. Nagle zmienna sama zmienia wartość.

Wklejam cały kod zdarzenia:

Kod: Zaznacz cały

void __fastcall TForm2::Memo10KeyPress(TObject *Sender, char &Key)
{
    char keyString[3];
   keyString[0] = Key;
   strcpy(&keyString[1], "ł");
   strcpy(&keyString[2], "ś");

   for(unsigned i = 1; i < sizeof(keyString); i++) /* sizeof(keyString) a nie sizeof(keyString)/2 */
   {
     if(Key == keyString[i]) Key = NULL;
   }   
}

[Cyfrowy Baron]

Zmienna sama niczego nie zmienia, to funkcja strcpy tak zapisuje znak. Spróbuj z funkcja StrCopy jeżeli takowa występuje w bibliotekach Turbo C++:

Kod: Zaznacz cały

void __fastcall TForm1::Memo1KeyPress(TObject *Sender, char &Key)
{
   char keyString[3];
   keyString[0] = Key;

   StrCopy(&keyString[1], "ł");
   StrCopy(&keyString[2], "ś");

   for(unsigned i = 1; i < sizeof(keyString); i++)
   {
    if(Key == keyString[i]) Key = NULL;
   }
}


Chociaż to pewnie niczego nie zmieni, ale nigdy nie korzystałem z Turbo C++, więc nie wiem jak to tam jest z funkcjami.

[Cyfrowy Baron]

Spróbuj zamiast strcpy funkcji strncpy:

Kod: Zaznacz cały

void __fastcall TForm1::Memo1KeyPress(TObject *Sender, char &Key)
{
   char keyString[3];
   keyString[0] = Key;

   strncpy(&keyString[1], "ł", 1);
   strncpy(&keyString[2], "ś", 1);

   for(unsigned i = 1; i < sizeof(keyString); i++)
   {
    if(Key == keyString[i]) Key = NULL;
   }
}


---

Korzystasz z Windows Vista, więc to może być związane z systemem, ale tego też nie mogę sprawdzić.

[kurczez]

Dzięki, zadziałało z strncpy.
Orientujesz się czy program korzystający z tej funkcji uruchomiony na XP będzie działał prawidłowo?

[Cyfrowy Baron]

Będzie działał, gdyż strncpy sprawdza się dokładnie tak samo jak strcpy, a jak widzisz ja korzystam z WindowsXP.

---

Co do Visty to jest już Windows 7, a to taka poprawiona Vista, o niebo lepszy od Visty, chociaż poza zmianami w wyglądzie nie różnie się wiele od Windows XP, więc może czas zmienić system.

[polymorphism]

Panowie, litości!

Kod: Zaznacz cały

void __fastcall TForm1::Memo1KeyPress(TObject *Sender, char &Key)
{
     if(strchr("łśćż",Key))Key = 0;
}


---

Kod: Zaznacz cały

strncpy(&keyString[1], "ł", 1);
strncpy(&keyString[2], "ś", 1);


A nie można po prostu:

Kod: Zaznacz cały

strncpy(keyString + 1,"łś",2);

lub nawet:

Kod: Zaznacz cały

keyString[1] = 'ł';
keyString[2] = 'ś';

[Cyfrowy Baron]

Wątek został oczyszczony z jałowych i zbędnych wypowiedzi zaśmiecających forum.
Na przyszłość, jeżeli ktoś odczuwa potrzebę wyładowania z siebie agresji to niech zakłada wątki w dziale Dyskusja.

Wątek został w całości przekopiowany do działu Dyskusja, więc jeżeli ktoś chce się jeszcze wyżalić to może to zrobić tutaj.