Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
random kod üretme hakkında
#1
herkese merhaba 

eksiğim olursa düzeltin kusuruma bakamayın delphide yeniyim bir türlü başarılı olamadım

şimdi bizim bir formumuz var bu formun içine bir sayı listesi gömüp bu sayı listesinden her hangi bir sayıyı ekrandaki edit alanına yazarak programı kapatmak istiyoruz toparlamak gerekirse 
elimde bir form var formda login button var ve bir adette password editi var bix password editi içine girilecek değeri bizim belirlediğimiz listeden rastgele seçilerek yapılamsını isitiyoruz bunu nasıl yapabiliriz şimdidden teşekkürler
Cevapla
#2
Selamlar

Random komutunu araştırarark başlayabilirsiniz işlemlerinize.
Yazılımcı, kahveyi koda çeviren bir organizmadır.
Cevapla
#3
ilginiz için teşekkür ederim random olayını yapabiliyorum sayı üretmede sorun yok ancak bu sayıyı parola yerine nasıl kullanırım bulamadım
Cevapla
#4
Sayı listesi sabit mi? Yoksa program her çalıştırıldığında o da mı random üretiliyor? Liste, bir dizi (array), bir bileşen (TMemo vs) yada harici bir doya (XML INI vs) da mı tutuluyor? Açık konuşmak gerekirse soruyu ben de anlamadım. İlk okuduğumda, bankaların internet şubelerine giriş için kullanılan, her seferinde değişik şifre üreten "şifrematik" benzeri bir yapı istiyor olabileceğinizi düşündüm ama sanırım alakası yok.
Cevapla
#5
liste var elimde bir adet Tmemo bileşeni ve bunun içinde karışık liste var bu liste hem exede hem mobil uygulamada var ben mobil uygulamada kodu alıp exedeki alana girip ekranı açmak istiyorum ama başaramadım
Cevapla
#6
Bir ekran paylaşır mısınız programınızdan. Öyle karışık yazılmış ki hala göz önüne getiremiyorum formunuzun yapsını.
Yazılımcı, kahveyi koda çeviren bir organizmadır.
Cevapla
#7
merhaba ekte ekran görüntüsü mevcut ben burada oluşturulan randomkodu edit alanında parola olarak nasıl kullanabilirim şuan ini file ile deniyorum buradan yapabilirmiyim bakacağım


Ek Dosyalar Resimler
   
Cevapla
#8
Kusura bakmayın anlamak için soruyorum, size sadece x değişkenin değeri lazımsa onu(x'i) global (Form1: Tform1; satırının altına) tanımlayınca işiniz görülmüyor mu? Sonrada
Edit1.Text:=IntToStr(x);
Cevapla
#9
(07-06-2021, Saat: 16:35)Hayati Adlı Kullanıcıdan Alıntı: Kusura bakmayın anlamak için soruyorum, size sadece x değişkenin değeri lazımsa onu(x'i) global (Form1: Tform1; satırının altına) tanımlayınca işiniz görülmüyor mu? Sonrada
Edit1.Text:=IntToStr(x);

denedim ama başarılı olamadım değeri edite giremedim farklı yöntemler deneyeceğim ilginize teşekkür ederim
Cevapla
#10
(07-06-2021, Saat: 10:43)mr.irregularr Adlı Kullanıcıdan Alıntı: herkese merhaba 

eksiğim olursa düzeltin kusuruma bakamayın delphide yeniyim bir türlü başarılı olamadım

şimdi bizim bir formumuz var bu formun içine bir sayı listesi gömüp bu sayı listesinden her hangi bir sayıyı ekrandaki edit alanına yazarak programı kapatmak istiyoruz toparlamak gerekirse 
elimde bir form var formda login button var ve bir adette password editi var bix password editi içine girilecek değeri bizim belirlediğimiz listeden rastgele seçilerek yapılamsını isitiyoruz bunu nasıl yapabiliriz şimdidden teşekkürler

Selamlar,
Sayıyı parola yerine kullanmayın. Random'la kaç hanelik bir parola üretecekseniz her karakteri için bir Random çalıştırın.
şöyle olabilir,
Önce bir olası parola karakterleri dizini oluşturursunuz, sonra istenen parola uzunluğu kadar random sayı üretip bu dizinden karakter bulursunuz. Bunları art arda eklediğinizde parolayı elde etmiş olursunuz.

function GeneratePassword(const n : Integer) : string;
const
  PossiblePasswordChars = 'ABCDEFGHIİJKLMNOÖPRSŞTUÜVYZabcdefghıijklmnoöprsştuüvyz1234567890!+%&@?-';
var
  s : string;
  i : Integer;
begin
  Randomize;
  s := '';
  for i:=1 to n do
    s := s + PossiblePasswordChars[Random(Length(PossiblePasswordChars))+1];
  Result := s;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.Text := GeneratePassword(10);
end;



Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Merkez Bankası Döviz Kurları Hakkında adelphiforumz 19 5.788 06-10-2021, Saat: 15:53
Son Yorum: bydelphi
Star ıdHTTP Post hakkında? [Çözüldü] ozcanm 3 2.051 01-10-2021, Saat: 13:24
Son Yorum: ozcanm
  DataSnap Rest Server Mimari Seçimi Hakkında LastCoder 3 150 31-08-2021, Saat: 00:11
Son Yorum: barutali
  Delphi Tarafında Hash Üretme COMMANDX 2 1.500 25-06-2021, Saat: 15:52
Son Yorum: COMMANDX
  Delphi İle Mobil Geliştirme Hakkında furkan.Dev 14 1.743 29-05-2021, Saat: 20:18
Son Yorum: furkan.Dev



Konuyu Okuyanlar: 1 Ziyaretçi