Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Benzersiz sayı üretimi Randomize
#21
Bence olaya bakış açınızı biraz değiştirin. Veritabanı, log tutma, Random veya benzersizlikle uğraşmak yerine bu şartları sağlayan ardışık bir sayı da işinizi görür.

Bunun için zamanın kendisini kullanabilirsiniz.

Şöyle bir fonksiyon işinizi görür diye tahmin ediyorum;

function BenzersizSayi: Double;
begin
  Result := FormatDateTime('yymmddHHMMSS', NOW ).ToDouble;
  // Kullanımı
  // Memo1.Lines.Add( BenzersizSayi.ToString );
end;

NOT: Bu arada "tamsayı"dan kastınız Integer mi?
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol # Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol # Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol # Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Cevapla
#22
Benzersiz sayı istiyorsanız; "zaman"ı kullanın Smile
Malum, giden zaman geri gelmiyor Big Grin
10 sn'de bir Now size benzersiz bir sayı üretir. (Saat geri alınmazsa Wink Gerçi geri alınsa bile aynı milisaniye içinde sorgu yapmanız lazım ki aynı sonuç alınsın)  
FloatToStr(Now)

Cevabımı gönderdim ki Uğur Bey'in benden önce yazdığını gördüm. Hemen hemen aynı mantıkla...
There's no place like 127.0.0.1
WWW
Cevapla
#23
Yazdığım en son yorumu makale bölümüne taşıdım.
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol

“Do. Or do not. There is no try.”
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Sayı hatalı ise Dostk 3 219 20-06-2017, Saat: 12:30
Son Yorum: Tuğrul HELVACI
  Butona Basıldığında Veritabanından Sayı Azaltma Mericx 2 366 13-01-2017, Saat: 13:13
Son Yorum: DelphiCan
  Sayı Eşleştirme Oyunu Fesih ARSLAN 0 1.415 25-07-2016, Saat: 21:47
Son Yorum: Fesih ARSLAN



Konuyu Okuyanlar: 1 Ziyaretçi