OnKeyPress

Hi, ich hab folgendes problem.

Wenn ich den event so verwende

//---------------------------------------------------------------------------

void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key){
if (Key == 13) {
	Button1->SetFocus();
	Form1->Button1Click(this);
	}
}
//---------------------------------------------------------------------------

dann krieg ich wenn ich jetzt enter drücke immer son "Bing" rein, wie es eben kommt wenn ne form ürgent nen tastendruck kriegt und net weiß was se damit machen soll. aber im grunde funktionierts, also es wird gemacht was ich will. aber ich will dieses bing nicht ^^'' weiß jemand wie man das wegkriegt?

Linnea

ja, schau mal in die FAQ Thema "Standard-Beep/Pling-Sound unterdrücken"

akari

Hallo

Du must nur den Key löschen

void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key){
if (Key == 13) {
    Button1->SetFocus();
    Form1->Button1Click(this);
    Key = 0;
    }
}

bis bald
akari

Schurke

danköö