|
Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
Delphi 10.2 Tokyo Professional
|
Re: Eine zufällige Wahl treffen...
11. Nov 2004, 16:30
Wieso nicht einfach :
Delphi-Quellcode:
var Frage : Array[1..50] of String;
procedure TForm1.Form.Create(Sender : TObject);
begin
randomize;
Label1.Caption := Frage[random(50)+1]; //Array muss natürlich vorher mit Fragen gefüllt werden
end;
Ist doch das einfachste oder ?
Michael "Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
|