Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi TEdit und [Enter]?? (https://www.delphipraxis.net/22017-tedit-und-%5Benter%5D.html)

cBoB 11. Mai 2004 12:37


TEdit und [Enter]??
 
Was passiert, wenn ich in einem EditFensterchen die Enter-Taste drücke? Der Computer piept kurz, aber es gibt keinen Fehler oder wie auch immer und der Cursor bleibt in dem Fensterchen stehen und blinkt weiter.
Wird irgendein Event ausgelöst, wenn man Enter betätigt? Mir ist nämlich daran gelegen die, in einer Groupbox beheimateten 2 TEdits und ein Radiobuttonfeld mit einem Enter, welches dann zu einem Button.Click führen soll, zu übernehmen, egal wo in der GroupBox ich mich befinde. Gibt es da eine schöne und kurze Lösung? Ich wollte nicht mit KeyPreview und onKeydown arbeiten.

Danke
-c-

sakura 11. Mai 2004 12:39

Re: TEdit und [Enter]??
 
Setze doch einfach die Eigenschaft Default des Buttons auf True. Dann wird der Druck auf die Enter-Taste automatisch in einen Button-OnClick umgewandelt.

...:cat:...

cBoB 11. Mai 2004 12:53

Re: TEdit und [Enter]??
 
Aaahhhhhhh, danke!

Ich hatte diese Möglichkeit von vornherein als ausgeschlossen betrachtet, weilich dachte, der Focus geht ja sowieso von dem Knopf wech.

erklär mal bitte kurz! die OH sagt für mich nur sehr diffuses über das "Default" aus.

-c-

gekmihesg 11. Mai 2004 12:56

Re: TEdit und [Enter]??
 
du kannst auch im onkeypress event von dem edit so machen:

Delphi-Quellcode:
if key = #13 then
  begin
    ...
  end;

Matze 11. Mai 2004 12:56

Re: TEdit und [Enter]??
 
Hi :hi:

Wenn Default auf true ist, dann wird bei Klickt auf "Enter" das OnClick dieses Buttons ausgelöst. ;)

cBoB 11. Mai 2004 13:03

Re: TEdit und [Enter]??
 
Jo, gut! Danke erstemal.
Jetz würde mich aber interessieren, wie dieses Begrenzt ist bzw. welche "Reichweite" das "default" hat? Ich hab auf meinem Form zwei GroupBoxen mit jeweils einem Button und Edits drin. Das ist schon nicht schlecht, dass ich dann jeden Button auf default setzen kann, aber ich habe nirgends was gefunden, was mir halt etwas über die Grenzen sagen könnte.

-c-

Niko 11. Mai 2004 13:26

Re: TEdit und [Enter]??
 
Zitat:

Zitat von Delphi-Hilfe
In einer Anwendung können mehrere Schaltflächen als Standardschaltflächen deklariert sein. Das Formular ruft die Ereignisbehandlungsroutine für OnClick immer für die erste sichtbare Schaltfläche in der Tabulatorreihenfolge auf. Jede Schaltfläche, die den Fokus besitzt, wird vorübergehend zur Standardschaltfläche. Wenn der Benutzer vor dem Drücken der Taste ENTER eine andere Schaltfläche auswählt, wird die Ereignisbehandlungsroutine OnClick der ausgewählten Schaltfläche ausgeführt.

Soll heißen es macht keinen Sinn mehrere Schaltflächen auf einem Formular auf Default zu stellen, da sowieso immer nur ein OnClick aufgerufen wird. Für dich wäre da wahrscheinlich der Vorschlag von gekmihesg günstiger.

Ultimator 11. Mai 2004 13:28

Re: TEdit und [Enter]??
 
Dann werden alle Buttons, die Default:=true haben, auf einmal gedrückt. Du musst halt dann bei den Edits nach dem OnChange gehen. Dort kannst du dann reinschreiben, dass die anderen Buttons Default:=false haben.

[edit] Sollte ich mich da geirrt haben? :stupid: [/edit]

Matze 11. Mai 2004 13:30

Re: TEdit und [Enter]??
 
Zitat:

Zitat von Ultimator
Dann werden alle Buttons, die Default:=true haben, auf einmal gedrückt. Du musst halt dann bei den Edits nach dem OnChange gehen. Dort kannst du dann reinschreiben, dass die anderen Buttons Default:=false haben.

:shock:

Zitat:

Zitat von Ultimator
[edit] Sollte ich mich da geirrt haben? :stupid: [/edit]

ja :mrgreen:

Real_Thunder 2. Jun 2006 03:37

Re: TEdit und [Enter]??
 
Wie kann ich es umgehen das das Warnsignal ausgelöst wird wenn ich bei einem Tedit Feld
auf enter drücke ?

Im OnKeyPress Ereignis des Tedit habe ich dies Stehen

Delphi-Quellcode:
if Key = #13 then begin
  ......
end;

MfG Real_Thunder

Lannes 2. Jun 2006 08:33

Re: TEdit und [Enter]??
 
Hallo,

Delphi-Quellcode:
if Key = #13 then
  begin
  //tu was
  key := #0;
  end;


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

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