Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Chance errechnen (https://www.delphipraxis.net/35907-chance-errechnen.html)

Red_Wraith 13. Dez 2004 16:39


Chance errechnen
 
Hi Again !

Mal wieder Fragen
ich bin dumm, ich weiss :D

Also, gibt es eine Möglichkeit eine Chance zu errechnen ?

Wenn ich zum Beispiel will, dass es eine 30% Chance beim Drücken eines Buttons gibt, dass sich...
zum Beispiel Panel1.backcolor in clRed verändert.

Wie funktioniert das ?

P.S.:
Hab das Forum nach "Chance" und "Chance errechnen" durchsucht, allerdings nichts gefunden.

SubData 13. Dez 2004 16:41

Re: Chance errechnen
 
So aus dem Stehgreif würde ich sagen erzeugst du eine Zufallszahl zwischen 1 und 10 und wenn die Zahl 1, 2 oder 3 ist, dann ist die Bedingung wahr :)

Nur so als Denkanstoß ^^

alcaeus 13. Dez 2004 16:41

Re: Chance errechnen
 
Hallo Red_Wraith,

z.B. so:
Delphi-Quellcode:
Randomize;
//...
if Random > 0.7 then
  Panel1.Color := clRed;
Greetz
alcaeus

gmarts 13. Dez 2004 16:42

Re: Chance errechnen
 
Hi,

Such mal nach Delphi-Referenz durchsuchenRandom


Z.B.

Delphi-Quellcode:
if Random(3)=1 then machebuttonrot; // 33,3 prozentige Wahrscheinlichkeit.
if Random(5)=1 then tuewas; //20 Prozentige Wahrscheinlichkeit.
//etc.


MfG Gunar


[Edit] Mal wieder zu langsam und wieder nicht so schön wie Alcaeus. :? [/Edit]

Red_Wraith 13. Dez 2004 17:01

Re: Chance errechnen
 
Danke, habt mir mal wieder aus der Patsche geholfen :)

Matze 13. Dez 2004 17:07

Re: Chance errechnen
 
Falls du das für mehrere Chancen brauchst, hilft dir evtl. auch Delphi-Referenz durchsuchencase. ;)


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:51 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 by Thomas Breitkreuz