Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: random

    Delphi
    by glitterangel87, 1. Jul 2005
  das ist das ganze! und ich schwör euch: gestern sind mir sooo oft 0 gekommen, da hab ich mir gedacht, ich dreh gleich durch!
  
  procedure TForm1.BitBtn1Click(Sender: TObject);
  begin
  for i:= 1 to 6 do
  begin
  randomize;
  a:=random(49)+1;
  end;
  repeat
• Forum: Object-Pascal / Delphi-Language

  random

    Delphi
    by glitterangel87, 1. Jul 2005
  hi! ich möchte eine Lottoziehung simulieren. deshalb habe ich randomize (bzw. random) verwendet. aber wie bekannt ist, gehen die zahlen bei lotto erst ab 1 los. jetzt hatte ich mir eigentlich gedacht, wenn ich eingebe
  
  v:=random(49)+1;
  
  dass keine 0 kommen sollte. denkste. wie mach ich das? kann mir BITTE wer helfen?
  
  lg ~glitterangel