Ping Pong @ Delphi

[ryLIX]

1. Arbeitest du wirklich mit .NET oder doch eher mit Win32?

2. Bei FormKeyPress(Sender: TObject; var Key: Char) sollte Key vom Typ Char sein.
Versuch mal:

Delphi-Quellcode:

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if (key=Char('s')) and (panel2.top<(320-75)) then  //spieler1 W(oben) & S(unten)
    panel2.top:=panel2.top+5
  else
    if (key=Char('w')) and (panel2.Top>0) then
        panel2.Top:=panel2.Top-5;
  if (key=Char('i')) and (panel3.top<(320-75)) then  //spieler2 I(oben) & K(unten)
    panel3.top:=panel3.top+5
  else
    if (key=Char('k')) and (panel3.Top>0) then
        panel3.Top:=panel3.Top-5;
end;