Problem mit OnKeyDown

[-=IOI=-]

Hi,

ich weiß es ist eine Anfängerfrage, aber ich komm einfach nicht drauf.

Was ich will ist, dass beim Drücken von Alt + s ein Button gedrückt wird, so wie bei Icq.

Danke für eure Hilfe
Flo

[ichbins]

Delphi-Quellcode:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (((key='S')or(key='s')) and (ssalt in shift)) then
    button1click(button1);
end;

[himitsu]

Normaler Weise reicht es, wenn du vor einem S in der Buttonbeschriftung ein & einschiebst.

z.B.

Code:

[color=red]&S[/color]tart
Ta[color=red]&s[/color]te
...

[ichbins]

stimmt, das hab ich ganz vergessen...

[-=IOI=-]

das mit dem & war mir bisher nicht bekannt, aber danke für die schnellen antworten