![]() |
Re: Erstes Delphi Programm =)
also irgendwie will das nicht so rihtig noch mal langsam erklären pls
|
Re: Erstes Delphi Programm =)
Was verstehst du den genau nicht?
|
Re: Erstes Delphi Programm =)
ich weiß nicht wie ich das mit den tags un dem random() zusammenfügen soll und wo ich das hinpacke
|
Re: Erstes Delphi Programm =)
Ich hätte das ganz anders gelöst:
Delphi-Quellcode:
dann in die procedure wenn der richtige gedrückt wurde für die nächste zeile, ins form create für die erste:
randomize; //ins form create
Delphi-Quellcode:
aus erfahrung kommt die höchste zufallszahl(in dem fall 5) nie.
x := random(5);
case x of 0: //Hier schreibst du, dass der erste richtig ist 1: //Hier schreibst du, dass der zweite richtig ist 2: //Hier schreibst du, dass der dritte richtig ist 3: //Hier schreibst du, dass der vierte richtig ist 4: //Hier schreibst du, dass der fünfte richtig ist end; Wenn das Blödsinn ist, dann sagt es bitte! mfG |
Re: Erstes Delphi Programm =)
Am Besten legst du eine neue private Variable im Formular an. Diese initialisierst du beim Spielstart mit einer Zufallszahl. (Bei 5 Buttons:
Delphi-Quellcode:
Zahl := Random( 4) + 1;
|
Re: Erstes Delphi Programm =)
so ähnlich hab ichs doch auch oder?
|
Re: Erstes Delphi Programm =)
Hat sich überschnitten, zudem ist es eine Ergänzung
|
Re: Erstes Delphi Programm =)
ahh immer noch zu komplizert xD
1. was ist einen persönliche variable 2. wo ist sie 3. wie soll ich das da alles einbauen ihr müsst bitte genauer erklären da ich delphi noch nicht wirklich behersche :) |
Re: Erstes Delphi Programm =)
wenn ein button gedrückt wird, überprüfst du doch ob er richtig ist?
wenn er richtig ist, dann lässt du die nächste zeile erscheinen und zusätzlich kannst du dann das random einbauen. die persönliche variable geht so:
Delphi-Quellcode:
..
procedure TForm1.ButtonClick(Sender: TObject);//das solltest du haben var x: Integer; //hier baust du die variable ein begin ... |
Re: Erstes Delphi Programm =)
Delphi-Quellcode:
wie kann ich hinkriegen das das meine buttons sind? einfach bitbtn1: oder wie?
x := random(5);
case x of 0: //<------------- 1: //<------------- 2: //<------------- 3: //<------------- 4: //<------------- end; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:48 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz