On Key Down funktioniert nicht

[Helmi]

doppelte Verneinungen gibts nur in der bayrischen Sprache
ansonsten:

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
 begin
  if inter then  //inter ist schon Boolean
 begin

statt:

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
 begin
  if not inter = false then
 begin

und bitte nicht auf true abfragen
statt:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
 begin
  if inter = true then
 begin

gleich so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
 begin
  if inter then
 begin