hello!
also, danke
nein das will ich ja gar nicht, dass du mir das ganze programm schreibst... aber danke
also, ich habe den code gott sei dank verstanden!
das einzige was bei mir nicht funktioniert ist die steuerung über die tasten 1 und q
warum fuktioniert denn das nicht: (???)
Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
If key = 27 Then close;
If Key = 31 Then player_rot.Rot(5);
If Key = 51 Then player_rot.Rot(-5);
die escape-zahl fuktioniert ja auch?!?
vielen dank
ach ja:
die linien sollen ja kollidieren..
meine idee wäre, am anfang der linie zu ermitteln auf welcher farbe sich der anfang befindet (wenn er zum beispiel blau ist soll die linie halten)