Rastgele sayı üretmek

YoRuMSuZ

Biz işimize bakalım...
Delphi'de basit şekilde belirlediğiniz sayı aralığında rastgele sayı üretmek için (Randomize) küçük bir örnek.

Form üzerine bir adet Button bir adet Label bileşeni bırakın.

Button1 onClick yordamına şu kodu yazın ve derleyin... (Kodlar 100 içinde rastgele sayı üretecektir)

Kod:
  Randomize;
  Label1.Caption:=IntToStr(Random(100));

Artık butona her tıkladığınızda 100 içinde rastgele bir sayı üretilecektir.

rastgele-sayi.gif
 
Top