Bild mit Tasten bewegen...

[NeoDeluxe]

Servus...
also ich will n run & jump machen...
will das ich mit steuerungs tasten n bild bewegen...
also ich weis das es durhc OnKeyPress gehen soll aber weis net wie man abfrag ob bestimmte tasten gedrückt wurde...
Hilfe...

Grüße, NeoDeluxe

[Blizzard]

Hallo,
erstmal solltest du bei der form keypreview auf true stellen und dann gehste am besten her und wählst mal das onkeyup oder onkeydown (mit onkeypress gehts ned da der die pfeiltasten ned kennt) ereignis an und drückst F1 um die Online Hilfe zu öffnen und schaust dir da die virtuellen tastencodes an

im endeffekt sollte das in deinem programm dann so aussehen:

Delphi-Quellcode:

procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 case key of
  vk_left:begin tuwas end;
  vk_right:tuwas
 end;
end;

die virtuellen tastencodes die du brauchst schauste am besten selber in der hilfe nach

mfg
Blizzard

[Christian Seehase]

Moin NeoDeluxe,

lange nicht gesehen. Schön, dass Du mal wieder reinschaust.

Im OnKeyPress kannst Du es z.B. so machen:

Delphi-Quellcode:

begin
  case ord(key) of 
    VK_UP : begin
      // Hier die Bewegung, in diesem Falle aufwärts
    end;
    // hier dann die Eintragungen für die weiteren Tasten
  end;
end;

Unter "Virtuelle Tastencodes" findest Du in der Hilfe die weiteren Codes.

[Blizzard]

@Seehase
ersten wieder zu spät *gg*
zweitens in onkeypress geht das zumindest bei mir mit d6 nicht, da da der key nur ein char ist und die virtuellen tastencodes keinem char entsprechen (deswegen auch virtuell). bei mir wir bei den pfeiltasten nicht mal ein onkeypress ereignis ausgelöst sondern nur onkeyup und onkeydown

Blizzard

[Christian Seehase]

Moin Blizzard,

Zitat von Blizzard:

ersten wieder zu spät *gg*

Stimmt, im OnKeyPress geht es nicht

Ich schieb's mal auf die Wärme (vorhin zeigte das Aussenthermometer im Auto (es stand im Schatten) 32,5°C)

[NeoDeluxe]

lösch den beitrag davor...geht wieder...hab OnMouseMove gemacht... *schäm* liegt wohl an der wärme...

Grüße, NeoDeluxe

[Daniel B]

Hallo,

http://www.delphipraxis.net/viewtopic.php?t=2889

Grüsse, Daniel

[Christian Seehase]

Moin NeoDeluxe,

Zitat von NeoDeluxe:

liegt wohl an der wärme...

PS: Beitrag wunschgemäss gelöscht.

[NeoDeluxe]

sorry...bin immer zu faul die suche zu benutzen.... *schäm*
bitte thread cloze...