Ich wollte den Quelltext von der Internetseite
www.delphigl.com zum Thema "Objekt gedreht und dennoch nach vorne bewegt" ausprobieren, habe aber das Problem ich weiß nicht wie und wo ich die Prozedur ProcessKey definieren muss. Und noch gleich ne Frage zu der Prozedure ermöglicht die Prozedure 2 oder 3 Tasten gleichzeitig abzufragen?
Wie man mit Delphi mehrere Tasten abfragt weiß ich (durch and- Verbindung). Das Problem ist nur das ich für z.B. vk_Left und vk_Up je eine Prozedure habe und für beide gleichzeitig auch eine Prozedure. Ich will aber nicht jede Prozedure doppelt abfragen. Dazu ein Beispiel:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9:
| case key of vk_Left: inc(a, 2); vk_Up: inc(b, 2); end; if (Key=vk_Left) and (Key=vk_Up) then begin inc(a, 2); inc(b, 2) end; |
Ermöglicht ProcessKey also ein kürzere Form und wie def. man die Prozedure?
Moderiert von
Gausi: Code- durch Delphi-Tags ersetzt.