|
Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
Delphi 12 Athens
|
15. Jan 2003, 13:54
Wie wärs mit einer if-Abfrage
Delphi-Quellcode:
var
Take: Integer;
begin
Take := Random(100); // 0..99
if Take < 60 then
// nimm Lösung 1
else if Take < 80 then
// nimm Lösung 2
else
// nimm Lösung 3
end;
Daniel Lizbeth
Ich bin nicht zurück, ich tue nur so
|