Image nur solange anzeigen wie Space Taste gedrückt

[Marco Haffner]

Zitat:

Zitat von Nailor

Wenn dann:

Delphi-Quellcode:

//im OnCreate noch keyPreview := true;
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  Image.Visible := not (Key = 32);
end;

Schon mal eine andere Taste gedrückt und wieder losgelassen?

[citybreaker]

Danke für eure Hilfe, es klappt
jetzt. :bouncing4: :bounce1:

[nailor]

Zitat:

Zitat von Marco Haffner

Zitat:

Zitat von Nailor

Wenn dann:

Delphi-Quellcode:

//im OnCreate noch keyPreview := true;
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  Image.Visible := not (Key = 32);
end;

Schon mal eine andere Taste gedrückt und wieder losgelassen?

Häh? :?: :?: :?: :?:

[roderich]

Nailor, er meint damit, daß bei Deinem Code das Bild wieder sichtbar wird, wenn man irgendeine Taste <> Space drückt und wieder losläßt.

[Matze]

@Nailor: Marco hat schon Recht!

Delphi-Quellcode:

Image.Visible := (Key = 32);

ist das selbe wie

Delphi-Quellcode:

if key=32 then Image1.Visible:=true;

[nailor]

ich habe Recht! (glaub ich)

Leertaste drücken
andere Taste drücken
andere Taste loslassen -> Bild is weg (bei euerm Code)

[flomei]

Hast du schon mal meinen Code ausprobiert? Das funktioniert! Und ich weiss ehrlich gesagt nicht warum ihr hier noch urlange rumprobiert und es doch immer das Gleiche bleibt...

MfG Florian :hi: