Delphi Dünyası Facebook'ta

Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

Gönderen Konu: rastgele secmek  (Okunma sayısı 854 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı harun06767

  • Delphi 2 Level 2
  • **
  • İleti: 60
  • Rep: +0/-1
rastgele secmek
« : 04 Ağustos 2008 21:17:07 »
slm arkadalar ben bir yerde tslıdım ds ysrdımcı olabilirmisiniz
butona
Table1.First;
 Table1.MoveBy(Random(Table1.RecordCount));
yazıyorum bu veri tabanımdaki verilerin sırasıyla degil atlayar gelmesini saglayacak ama ben butona bir defa bastıgımda bu işlemi bir defa yapıyor bur da ne eksik bir daha bastıgımda yapmıyor baska butona yaz sam da olmuyor
hep aynı işi yapıyor baska larına atlamıyor  yardımlarınız için tskler

Çevrimdışı Kocaturk

  • Administrator
  • *****
  • İleti: 2.474
  • Rep: +56/-5
  • Cinsiyet: Bay
    • Delphi Dünyası
Ynt: rastgele secmek
« Yanıtla #1 : 04 Ağustos 2008 21:31:19 »
Aslında kod da bir hata yok, hatta ben denedim çalışıyor ve her defasında farklı bir kayıda konumlanıyor ama istersen sen en üste bir de Randomize ekleyip öyle dene.

triangle

  • Ziyaretçi
Ynt: rastgele secmek
« Yanıtla #2 : 04 Ağustos 2008 23:21:39 »
bir üst satırına randomize ekle yani
randomize;
 Table1.MoveBy(Random(Table1.RecordCount));

//Random komutu randomize yazmazsan hep aynı degerleri cevirir o yüzden randomize sart:)