帮忙把这段VB。NET下的代码翻译成DELPHI啊？

Question

Private Sub txtVarStep_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtVarStep.KeyPress    
    If e.KeyChar = Chr(13) Then
         e.Handled = True
      SendKeys.Send("{tab}")
    End If
 End Sub

Answer 1

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
  key := #9;
end;

Answer 2

不行，实现不了效果啊。
我是要在几个输入的组件中，当按回车时，以TAB的顺序切换到下一个，使下一个输入组件获得焦点。

Answer 3

你首先要把每个Edit的tabOrder属性都按照你要的顺序都排列好了
然后在窗体的KeyPress事件写  if Key = #13 then
  begin
    Perform(WM_NEXTDLGCTL, 0, 0);
    Key := #0;
  end;
还要把窗体的KeyPreview属性设置为True;