Hallo,

ich habe jetzt ein Programm fertig geschrieben und möchte der Konfort halber etwas einbauen^^

Egal wo und wann, soll wenn ich die Taste ENTER Drücke der Button (nennen wir ihn Prüfen) automatisch gedrückt werden?

MFG

Dann stell mal die "Default"-Eigenschaft des Buttons auf true.

markieren

Delphi-Quellcode:

// Form1.keypreview:= true;
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
//if Key=#27 then Button1.Click; // ESC wäre besser als RETURN
if Key=#13 then Button1.Click; // RETURN
end;

Button.Default=True <- Enter (inkl. Default-Button-Style)
Button.Cancel=True <- Escape
Button <- Space (drück mich, wenn ich aktiv bin)

Außer der Fokus ist z.B. in Memos, welche diese Tasten selber verarbeiten, wenn man Memo.WantReturns auf True stehen lässt. (Strg+Enter = immer Zeilenumbruch)

VK_RETURN
VK_ESCAPE

Zitat von t.roller:

markieren

Delphi-Quellcode:

// Form1.keypreview:= true;
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
//if Key=#27 then Button1.Click; // ESC wäre besser als RETURN
if Key=#13 then Button1.Click; // RETURN
end;

einfach als extra procedure schreiben?
jedenfalls geht es net ^^

Zitat von himitsu:

Button.Default=True <- Enter (inkl. Default-Button-Style)
Button.Cancel=True <- Escape
Button <- Space (drück mich, wenn ich aktiv bin)

Außer der Fokus ist z.B. in Memos, welche diese Tasten selber verarbeiten, wenn man Memo.WantReturns auf True stehen lässt. (Strg+Enter = immer Zeilenumbruch)

VK_RETURN
VK_ESCAPE

mal angenommen der fokus liegt auf einen anderen button ... wenn ich im edit feld bin geht ENTER.
wenn ich net im edit Feld bin, geht ENTER wiederum net...

ich möchte aber immer das EMTER haben ^^

danke, habe das ganze mit ActiveControl:= Edit1; geregelt ^^

Zitat von derPat17:

Zitat von t.roller:

markieren

Delphi-Quellcode:

// Form1.keypreview:= true;
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
//if Key=#27 then Button1.Click; // ESC wäre besser als RETURN
if Key=#13 then Button1.Click; // RETURN
end;

einfach als extra procedure schreiben?
jedenfalls geht es net ^^

Dir fehlen Grundlagen-Kenntnisse.