Aktion ausführen wenn Taste gedrückt wird

Iser · Hält's aus hier Beiträge: 10

Mit welchem Befehl kann ich mit einem Tastendruck auf der Tastatur einen bestimmten Befehl ausführen, wie zum Beispiel
dass ein Textfeld mit der inschrift 'Hallo' erscheind sobald man auf "W" drückt???

Danke schonmal im voraus

Georg08 · Verfasst: Do 04.06.09 21:27

Form OnKeyDown und überprüfen was gedrückt wurde...

Iser · Hält's aus hier Beiträge: 10

markieren

Delphi-Quelltext

1:	if OnKeyDown 'W' then

Oder wie?

jaenicke · Verfasst: Do 04.06.09 21:48

OnKeyDown ist ein Ereignis, auf das du reagieren kannst...
Schau dafür im Objektinspektor unter Ereignisse und klicke daneben doppelt um es zu erstellen.

Wie immer bei derart fehlenden Grundkenntnissen der Hinweis:
Einen sehr guten Crashkurs findest du hier:
crashkurs.christian-stelzmann.de
und die neue Version speziell ab Turbo Delphi:
www.christian-stelzm...shkurs_reloaded.html

Ein weiteres gutes Online-Buch:
de.wikibooks.org/wik...grammierkurs:_Delphi

platzwart · Verfasst: Do 04.06.09 21:48

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
 If(Key = 54)then
  begin
   doSomething();
  end;
end;

Key ist nicht ein Buchstabe, sondern der Tastaturcode... Also 54 durch entsprechenden Code austauschen...

_________________
Wissenschaft schafft Wissenschaft, denn Wissenschaft ist Wissenschaft, die mit Wissen und Schaffen Wissen schafft. (myself)

Iser · Hält's aus hier Beiträge: 10

Jetzt schauts so aus

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 If(Key = $57)then
  begin
  bild.Canvas.Rectangle(0,0,bild.Width,bild.Height);
  Vieleck.Setywert(Vieleck.Getywert-1);
  bild.update;
end;

Aber tut sich nix wenn ich W drücke... also er sollte die zeichnung nach oben verschieben
Acuh wenn ich aus $57, 57 machen klapps nicht

jaenicke · Verfasst: Do 04.06.09 22:30

Hast du das Ereignis denn auch verknüpft?
Setz doch einmal einen Haltepunkt und schau, ob das Programm da ankommt.

Hat vielleicht eine andere Komponente gerade den Eingabefokus? Ein Button zum Beispiel? Dann musst du KeyPreview noch beim Formular auf True setzen.

thepaine91 · Verfasst: Fr 05.06.09 08:36

hi, hab zwar nur überflogen aber hast du die Eigenschaft Keypreview in deinem Formular auf true gesetzt? Ansonsten fängt
er die Taste nur ab wenn der Focus auf deinem Formular ist.

Edit: Jaenicke hat es ja bereits geschrieben sehe ich atm, sry 4 it.

Ach wenn du buchstaben mit Key abfangen willst kleiner Tipp.

markieren

Delphi-Quelltext

1:	if Key = ord('W') then close;

spart man sich das lästige gucken wie der Tastaturcode ist

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme