Autorennen by Tigerhead

[Nicodius]

hab beim ersten mal gegen profi gewonnen :lol:
bin halt n richtiger zocker was ;) :P :P

naja ... konnte das nur weil mal so n altes lucky luck (ne nicht vo ndir lucky ;) ) .. spiel drauf aufbaute :drunken: da musste man ganz schnell bei der ps one die vierecktaste drücken ... controllerhinlegen und ganz viel draufhämmern(finger ganz nah drann und zack zack zack ..) ;)

:mrgreen: :mrgreen: :mrgreen:

tolle erklärung was? ;)


naaja .. entertaste sperren würd ich so machen(das ichs so macht heißt wenig gel? :twisted: ) :

Delphi-Quellcode:

if key <> VKreturn 
        then
        begin    

        end;

weil euer code gibt nur die nachricht dazu aus sperrt die taste aber nicht ... nach dem beginn den code für das weiterbewegen rein(image1.left := image1.left + Zahl)


und bitte mach das man das info fenster auch nach dem Straßenaufbau sehen kann :stupid:
(zeichne deine straße halt nacher nochmal ;) )
greeze

Nico

[Matze]

Ich kann zwar rar entpacken, aber bitte gewöhne dir an, zukünftig das zip-Format zu verwenden, das ist der Standard schlechthin.

[Nicodius]

aber für das kannst du ihm nichts antun ;) .. was wäre würde jemand sagen c sharp ist der standart ? oder delphi 8 .... "was du hast delphi 3 - aufrüsten das d8 ist DER standart" ;)

:mrgreen:

[Matze]

Zitat:

Zitat von Nicodius

aber für das kannst du ihm nichts antun ;) .. was wäre würde jemand sagen c sharp ist der standart ? oder delphi 8 .... "was du hast delphi 3 - aufrüsten das d8 ist DER standart" ;)

:mrgreen:

Das ist komplett was anderes.

[fkerber]

Hi!

Zu Zip <-> Rar:
Die Diskussion hatten wir schon öfter, aber irgendwie ne Antwort gab es nicht :roll:


Zum Programm:
Du hast das Key-Preview nicht auf True gesetzt oder? Solange der Button den Focus hat kann ich enter drücken soviel ich will, erst im Zeil meckert er.


Ciao Frederic

P.S.: Habe auch ihne Enter gegen Profi gewonnen

[emsländer]

Kannst Du bei den Ampelphasen evtl. noch einen kurzen Ton bringen? kurz bei rot und gelb, lang bei grün.

Gruss

EL

[Gast]

Das hatte ich auch vor, wirklich. Habe aber keinen Plan wie das geht. Hier mal der Code Teil für die Ampeln. Vielleicht kann mir jmd das da ja einbauen :) Und auch gut wäre wenn jmd mir sagen könnte welche Sounds ich nehmen kann. Vielleicht einen Windows Standart Sound ? Wenn ja welchen ?

Code:

procedure TForm1.Timer4Timer(Sender: TObject);
begin
 Label1.Caption := IntToStr(gewonnen);
 gewonnen := gewonnen -1;
 if (Label1.Caption = '0') then begin
  Image1.visible := true;
 end else
 if (Label1.Caption = '-1') then begin
  Image1.visible := false;
  Image2.visible := true;
 end else
 if (Label1.Caption = '-2') then begin
  Image2.visible := false;
  Image3.visible := true;
 end else
 if (Label1.Caption = '-3') then begin
  Image3.visible := false;
 end else
 if (Label1.Caption = '-4') then begin
  gewonnen := 0;
  Timer4.Enabled := false;
  btstop.Enabled := true;
end;
end;

[Nicodius]

windows.beep(Frequenz,Länge) ;)

so einfach isses ..



abber bitte.... ich persönlich hasse beepen :roll: wenn dann einschaltbar ;)

und ich empfehle dir dringend bei luckies hompage die Codeformierung anzuschauen .. :freak:

[Gast]

Kann mir das vielleicht jmd da rein schreiben mit dem Sound, denn:

1. Kenne ich mich nicht mit Requenz aus. (was laut/leise ist)
2. Kenne ich mich nicht mit der Zeit aus. (kein Plan wie lange es gehen soll)
3. Funktioniert das irgendwie leider bei mir nicht ...

Gr33tz!
Tigerhead


//edit: Wollte das im neuen Timer machen, da man das dann ausmachen kann. Aber irgendwie höre ich nichts.

Code:

begin
if (Image1.visible = true) then
windows.beep(100,100);
end;

[Nicodius]

100 millisekunden ist auch etwas kurz =)