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 Taste drücken Button drücken (https://www.delphipraxis.net/78363-taste-druecken-button-druecken.html)

Axxus 3. Okt 2006 19:35


Taste drücken Button drücken
 
Hi Delphianer

Hab schon gesucht aber nix gefunden

Ich will ne Konsole proggen und und es soll immer wenn ich return drücke die gleiche anweisung ausgeführt werden wie wenn ich den "senden" button drücke

Den Quelltext kopieren will ich aber net da das ziemlich unprofessionell wäre

Und den Fokus kann ich dem Button auch net geben da der Fokus auf dem editfeld zum eingeben liegen muss
Wisst ihr wie ich das machen kann???

:!: Axxus :!:

EDatabaseError 3. Okt 2006 19:36

Re: Taste drücken Button drücken
 
jup,

Beim Enter (#13) ButtonSenden.Click;


tobi

mkinzler 3. Okt 2006 19:37

Re: Taste drücken Button drücken
 
Auf die Return-Tase im Edit reagieren und dann den Klick des Buttons auslösen.

Axxus 3. Okt 2006 19:39

Re: Taste drücken Button drücken
 
mom hab ich das
Delphi-Quellcode:
procedure TKonsole_Form.Konsole_Key_Down(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  If key = VK_return then
  ???

end;
und dann???

Axxus

EWeiss 3. Okt 2006 19:43

Re: Taste drücken Button drücken
 
Zitat:

Zitat von Axxus
mom hab ich das
Delphi-Quellcode:
procedure TKonsole_Form.Konsole_Key_Down(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  If key = VK_return then
  ???

end;
und dann???

Axxus

in die procedure deines Sendebutton springen.

gruß

EDatabaseError 3. Okt 2006 19:44

Re: Taste drücken Button drücken
 
Delphi-Quellcode:
procedure TKonsole_Form.Konsole_Key_Down(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  If key = VK_return then
   ButtonSenden.Click;

end;
;-)

Axxus 3. Okt 2006 19:51

Re: Taste drücken Button drücken
 
MAn ich stand grad voll auf dem schlauch aber jetzt hab ichs
:coder2:

danke Leute

Axxus


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:07 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-2025 by Thomas Breitkreuz