Hogyan kell delphiben azt megoldani, hogy Enterrel működjön?

Kattintgatással ugyan eltudom érni a célom, de jó volna ha az Enter lenyomásával működne, ilenkor az egyik program részről a másikra kellene tudnia ugrani.

Pl. ez a feladat első két része

procedure TForm1.FormActivate(Sender: TObject);

begin

Form1.Caption:='Snake Game';

Form1.Height:=200;

Form1.Width:=200;

Label1.Caption:='Snake';

Label1.Font.Size:=30;

Label1.Font.Name:='Comic Sans MS';

Label1.Font.Color:=clRed;

Label1.Top:=(ClientHeight-Label1.Height) div 2;

Label1.Left:=((ClientWidth-Label1.Width) div 2)+10;

Label2.Caption:='Start Game';

Label2.Font.Size:=20;

Label2.Font.Name:='Papyrus';

Label2.Font.Color:=clBlue;

Label2.Top:=130;

Label2.Left:=((ClientWidth-Label2.Width) div 2)+20;

Label3.Visible:=False;

Label4.Visible:=False;

Edit1.Visible:=False;

Timer1.Enabled:=False;

Memo1.Visible:=False;

end;

procedure TForm1.Label2Click(Sender: TObject);

begin

Label2.Visible:=False;

Label1.Visible:=True;

Label1.Caption:='Continue';

Label1.Font.Size:=20;

Label1.Font.Name:='Arial';

Label1.Font.Color:=clLime;

Label1.Top:=120;

Label1.Left:=(ClientWidth-Label1.Width) div 2;

Label3.Visible:=True;

Label3.Caption:='Name:';

Label3.Font.Color:=clWhite;

Label3.Top:=88;

Label3.Left:=28;

Edit1.Visible:=True;

Edit1.Top:=85;

Edit1.Left:=62;

end;