procedure keydown im quellcode aufrufen

[HariboHunter]

Hiho,

ich würde gerne

Code:

procedure TForm1.combobox1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var
  mgs: TMsg;
  SIcon: TIcon;

begin
  case Key of
    VK_RETURN:
      begin  // ENTER oder TAB-Taste erkannt
        Key := 0;
       ...

über diesen Code:

Code:

procedure TForm1.ToolButton8Click(Sender: TObject);
var Shift: TShiftState;
begin

form1.combobox1KeyDown( Self , [VK_RETURN] , ssshift );
end;

aufrufen.

Ich kenne aber die richtige Syntax nicht, vieleicht kann mir jemand weiterhelfen ?!?