Image nur solange anzeigen wie Space Taste gedrückt

[Marco Haffner]

Und warum nicht folgendes?

Delphi-Quellcode:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  Image.Visible := (Key = 32);
end;

procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  Image.Visible := False;
end;