Moin Hansa,
Zitat von
Hansa:
der Code ist gigantisch :i := random (10);
... und für das was Spike machen wollte unvollständig. Bei Dir kommt 0 bis 9 raus
i := random(10)+1;
Nicht zu vergessen einmal Randomize aufzurufen (z.B. im OnCreate des Formulares)