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
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
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
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
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
Shocked Çoklu Dil Desteği Hakkında SercanTEK 10 304 28-08-2018, Saat: 13:24
Son Yorum: uparlayan
Exclamation Derleyici Direktifleri Hakkında, yhackup 8 3.224 22-08-2018, Saat: 19:52
Son Yorum: boreas
  Uses Kullanım Hakkında hi_selamlar 2 174 02-08-2018, Saat: 23:42
Son Yorum: hi_selamlar
  Chart1 kullanımı hakkında cinarbil 2 171 31-07-2018, Saat: 12:31
Son Yorum: cinarbil
  TDevBroadcastDeviceInterface hakkında. seci20 4 232 30-07-2018, Saat: 09:08
Son Yorum: Tuğrul HELVACI



Konuyu Okuyanlar: 1 Ziyaretçi