Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Edit und Enter Fehlermeldungsgeräusch (https://www.delphipraxis.net/49768-edit-und-enter-fehlermeldungsgeraeusch.html)

Nils_13 15. Jul 2005 17:49


Edit und Enter Fehlermeldungsgeräusch
 
Hi,

ich habe in meinem Programm ein Edit. Wenn ich etwas wie 'exit' eintippe, kommt das geräusch von einer Windowsfehlermeldung. Das kann man irgendwie abschalten, wisst ihr wie ?

Delphi-Freak 15. Jul 2005 19:03

Re: Edit und Enter Fehlermeldungsgeräusch
 
Hi!

Naja, wie man das abschalten kann weiß ich auch nicht. Halt ein WorkAround: TMainMenu mit TMenuItem mit Shortcut auf Enter und dann den Befehl ausführen.

LG

PS: Enter nennt sich im Objektinspektor »Eingabe«.


Edit2: Nur ein Hinweis: dein Link in deiner Sig funktioniert nicht (404). Aber du bist doch nicht wirklich Mafia-Mitglied - oder :wink:

turboPASCAL 15. Jul 2005 21:13

Re: Edit und Enter Fehlermeldungsgeräusch
 
Das Signal soll eigentlich anzeigen, das kein Zeilenumbruch erlaubt ist. (Einzeiliges Edit Feld)

Akustisches Signal bei Edit - Feld ausschalten:
Delphi-Quellcode:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key=#13 then // #13 = Enter
  Key:=#0;        //  #0 = nix
end;

Delphi-Freak 16. Jul 2005 07:38

Re: Edit und Enter Fehlermeldungsgeräusch
 
Aha :o
Das ist mir neu, leuchtet mir aber ein; gute Idee

Nils_13 16. Jul 2005 08:12

Re: Edit und Enter Fehlermeldungsgeräusch
 
Zitat:

Zitat von Delphi-Freak
Edit2: Nur ein Hinweis: dein Link in deiner Sig funktioniert nicht (404). Aber du bist doch nicht wirklich Mafia-Mitglied - oder :wink:

Zitat:

Zitat von turboPASCAL
Das Signal soll eigentlich anzeigen, das kein Zeilenumbruch erlaubt ist. (Einzeiliges Edit Feld)

Akustisches Signal bei Edit - Feld ausschalten:
Delphi-Quellcode:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key=#13 then // #13 = Enter
  Key:=#0;        //  #0 = nix
end;

Ich weiß das der Link nicht läuft, dagegen kann ich aber nichts machen, der Server ist seit ca. einem Monat offline, frag Unrealer, wenn du näheres wissen willst.

thx, jetzt läufts.


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:28 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz