<![CDATA[BCB 5 - Tastenblockierung?]]>Hallo,
ich bin grad dabei mit Edit-Feldern im Objektinspektor unter Ereignisse/OnKeyPress am experimentieren.

Dazu habe ich, um nurnoch die Eingaben 0-9 und Komma und Backspace zu erlauben, im Objektiinspektor unter Ereignisse/OnKeyPress folgenden Code eingegeben:

// Tastenblockierungen für "Gewinn aus Gewerbebetrieb"
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
    if ( Key >= '0' && Key <= '9' || Key == ',' || Key == 0x08 )
{
}
    else
{
    Key = 0x00;     // keine Reaktion
}
}

Funktioniert auch alles ganz Prima. Ich würde aber noch gerne erreichen, dass das Komma nur 1x reagiert. Hat vielleicht jemand ne Idee oder ne Patentlösung?

thx
G-Kar

]]>https://www.c-plusplus.net/forum/topic/167171/bcb-5-tastenblockierungRSS for NodeThu, 13 Aug 2026 03:53:16 GMTThu, 07 Dec 2006 13:15:37 GMT60<![CDATA[Reply to BCB 5 - Tastenblockierung? on Thu, 07 Dec 2006 13:15:37 GMT]]>Hallo,
ich bin grad dabei mit Edit-Feldern im Objektinspektor unter Ereignisse/OnKeyPress am experimentieren.

Dazu habe ich, um nurnoch die Eingaben 0-9 und Komma und Backspace zu erlauben, im Objektiinspektor unter Ereignisse/OnKeyPress folgenden Code eingegeben:

// Tastenblockierungen für "Gewinn aus Gewerbebetrieb"
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
    if ( Key >= '0' && Key <= '9' || Key == ',' || Key == 0x08 )
{
}
    else
{
    Key = 0x00;     // keine Reaktion
}
}

Funktioniert auch alles ganz Prima. Ich würde aber noch gerne erreichen, dass das Komma nur 1x reagiert. Hat vielleicht jemand ne Idee oder ne Patentlösung?

thx
G-Kar

]]>https://www.c-plusplus.net/forum/post/1188329https://www.c-plusplus.net/forum/post/1188329Thu, 07 Dec 2006 13:15:37 GMT<![CDATA[Reply to BCB 5 - Tastenblockierung? on Thu, 07 Dec 2006 13:39:28 GMT]]>bool komma = false; void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key) { if ( Key >= '0' && Key <= '9' || Key == ',' && komma == false || Key == 0x08 ) { if (Key == ',') komma = true; } else { Key = 0x00; // keine Reaktion } }

oder du nimmst n maskedit 😕 😃

]]>https://www.c-plusplus.net/forum/post/1188353https://www.c-plusplus.net/forum/post/1188353Thu, 07 Dec 2006 13:39:28 GMT<![CDATA[Reply to BCB 5 - Tastenblockierung? on Thu, 07 Dec 2006 14:09:36 GMT]]>thx, funktioniert. Allerdings bringt die Lösung zu ein neues Problem:
Wenn man jetzt wegen einer Korrektur das Komma wieder löscht, kann man kein neues mehr einfügen......

Naja, dann hab ich ja wieder was zum knobeln. Wenn jemand ne Lösung weiß, immer her damit.

cu
G-Kar

]]>https://www.c-plusplus.net/forum/post/1188382https://www.c-plusplus.net/forum/post/1188382Thu, 07 Dec 2006 14:09:36 GMT<![CDATA[Reply to BCB 5 - Tastenblockierung? on Thu, 07 Dec 2006 14:55:39 GMT]]>dann überprüfe halt, ob im text ein komma vorhanden ist, wenn ja darf keins mehr rein, sonst ja

]]>https://www.c-plusplus.net/forum/post/1188408https://www.c-plusplus.net/forum/post/1188408Thu, 07 Dec 2006 14:55:39 GMT