Delphi-Quellcode:
function zahl(von, bis: integer): integer;
begin
result:= random(bis - (von + 1)) + von + 1;
end;
funkt nur, wenn "von" kleiner als "bis" ist.
kannst ja noch ne abfrage reinmachen.
rarndomize dann halt im onCreate oder so.
gruss,
iaby