Thema: Delphi Zufallsnamen erzeugen...

Einzelnen Beitrag anzeigen

Benutzerbild von nailor
nailor

Registriert seit: 12. Dez 2002
Ort: Karlsruhe
1.989 Beiträge
 
#18
  Alt 18. Feb 2003, 18:31
Delphi-Quellcode:
namen: array[0..99] of string = ({so, deine namen, als string mit Kommas (100 Stück)});

//in der Procedure:

Label1.Caption := namen[random(99)];

//und noch bei starten (also im Project-Source oder onCreate ein Randomize...
Ergebnis: Auf Label 1 kommt zufällig einer deiner hundert Namen. Vielleicht willst du sie aber auch aus einer Datei auslesen, hätte ein paar Vorteile...

---
hey phlux, wir könnten unsere Gehirne zusammenpacken, dann müsste man so was nicht doppelt denken...
Michael N.
http://nailor.devzero.de/code/sharpmath/testing/ --- Tests, Feedback, Anregungen, ... aller Art sehr willkommen!
::: don't try so hard - it'll happen for a reason :::
  Mit Zitat antworten Zitat