Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
listbox kullanımı hakkında yardım !
#1
Question 
listbox'a eklediğim items'leri butona basarak random şekilde nasıl label'de gösterebilirim ? 
bunun kodlamasını bilen varsa yazabilir mi ? 
şimdiden teşşekkür ederim...
                    Basit Mantık :
Neyin Neyini Neye Ne Yapmak İstiyorsun ? 
Cevapla
#2
Merhabalar,

İlk olarak konunun büyük harf ile yazılması bağırma anlamına gelir, düzeltmenizi rica ediyorum.

Listbox'a eklediğiniz itemleri rastgele yazdırma işlemi ise;

Random işlemini araştırmanızda fayda var. Ne kadar direkt kod vermeyi sevmesem de;

uses
..
Math


procedure TForm1.Button1Click(Sender: TObject);
var
Rastgele: Integer;
begin
Rastgele := RandomRange(0, ListBox1.Count);
ShowMessage(ListBox1.Items[Rastgele]);
end;


Şeklinde kullanabilirsiniz. 


Sonuç:

Dy1nYm.gif
May the force be with you!
Cevapla
#3
öncelikle yeni olduğum için bilmiyordum uyardığınız için teşşekkür ederim. ve kodu paylaştığınız için de teşşekkürler...elinize sağlık.

10. satırda hata alıyorum nedeni nedir ?
                    Basit Mantık :
Neyin Neyini Neye Ne Yapmak İstiyorsun ? 
Cevapla
#4
(29-11-2017, Saat: 21:09)BY-HAYALET Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Olöncelikle yeni olduğum için bilmiyordum uyardığınız için teşşekkür ederim. ve kodu paylaştığınız için de teşşekkürler...elinize sağlık.

10. satırda hata alıyorum nedeni nedir ?

Hatanın ne olduğunu görmeden, çözüm bulmak çok zor. Smile
Hata ekran görüntüsü veya mesajını yazarsanız, yardımcı olmaya çalışalım.
While true do; Hayat döngüsü, kısır değildir! Yapılan bir yanlış, o döngünün dışına çıkmanızı sağlayacaktır.
WWW
Cevapla
#5
(29-11-2017, Saat: 21:09)BY-HAYALET Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Olöncelikle yeni olduğum için bilmiyordum uyardığınız için teşşekkür ederim. ve kodu paylaştığınız için de teşşekkürler...elinize sağlık.

10. satırda hata alıyorum nedeni nedir ?

Kodun en üst bölümünde Math kütüphanesini girmenizi istemişim. Sanırsam kütüphaneyi kullanmadan kodları yazmışsınız.

(29-11-2017, Saat: 21:21)Fesih ARSLAN Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
(29-11-2017, Saat: 21:09)BY-HAYALET Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Olöncelikle yeni olduğum için bilmiyordum uyardığınız için teşşekkür ederim. ve kodu paylaştığınız için de teşşekkürler...elinize sağlık.

10. satırda hata alıyorum nedeni nedir ?

Hatanın ne olduğunu görmeden, çözüm bulmak çok zor. Smile
Hata ekran görüntüsü veya mesajını yazarsanız, yardımcı olmaya çalışalım.

 Tahmin ettim doğru çıkarsa demek kahinlik günümdeyim  Big Grin Big Grin
May the force be with you!
Cevapla
#6
(29-11-2017, Saat: 21:09)BY-HAYALET Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Olöncelikle yeni olduğum için bilmiyordum uyardığınız için teşşekkür ederim. ve kodu paylaştığınız için de teşşekkürler...elinize sağlık.

10. satırda hata alıyorum nedeni nedir ?

Hatanın ne olduğunu da yazarsan iyi olurdu ama muhtemelen uses 'da system.math yok ekle düzelir veya

RandomRange üzerine tıkla CTRL + SHIFT + A yap ilgili unitleri listeler eklersin
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Kuvvete dayanamayan adalet aciz, 
Adalete dayanamayan kuvvet zalimdir.
WWW
Cevapla
#7
çok teşşekür ederim Smile çalıştı.
                    Basit Mantık :
Neyin Neyini Neye Ne Yapmak İstiyorsun ? 
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Puanların Önemi Hakkında... Tuğrul HELVACI 18 6.656 15-07-2018, Saat: 22:21
Son Yorum: uparlayan
  whatsApp api kullanımı klavye 2 94 05-07-2018, Saat: 12:17
Son Yorum: klavye
Question SFTP Hakkında elixir84 3 138 25-06-2018, Saat: 10:02
Son Yorum: SimaWB
  Veritabanı hakkında mehmetalpgozbasi 4 213 19-06-2018, Saat: 12:57
Son Yorum: mehmetalpgozbasi
  Listbox 'da isim tutma quiet1day 4 168 11-06-2018, Saat: 16:47
Son Yorum: quiet1day



Konuyu Okuyanlar: 1 Ziyaretçi