Listbox satır karakter uzunlugunu alma

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
conari
Üye
Mesajlar: 2102
Kayıt: 27 Nis 2006 03:10
Konum: İstanbul & Gebze Karışık

Listbox satır karakter uzunlugunu alma

Mesaj gönderen conari »

Listbox satır karakter uzunlugunu almak için
Lenght fonk. kullanıyorum

lenght(Listbox.item.text)

ama bu tüm listbox takileri hesaplıyor satır olarak nasıl olabilirim.
Bir kelimenin anlamını öğretsen bile yeter..
ResimResim
Kullanıcı avatarı
vkamadan
Kıdemli Üye
Mesajlar: 1935
Kayıt: 17 Mar 2004 03:52
Konum: Adapazarı
İletişim:

Mesaj gönderen vkamadan »

merhaba,

Kod: Tümünü seç

Length(ListBox1.items[0]);
gibi eleman indisini veririseniz ilgili satırın uzunluğuunu alabilirsiniz.
İyi çalışmalar.
Volkan KAMADAN
www.polisoft.com.tr
Kullanıcı avatarı
conari
Üye
Mesajlar: 2102
Kayıt: 27 Nis 2006 03:10
Konum: İstanbul & Gebze Karışık

Mesaj gönderen conari »

@Volkan Teşekkürler,

Konu ile ilgili bir şey daha.
aldığım uzunluk verdiğim koşula uyuyor ise onu bir memo içine atacağım
Yalnız item[0].text gibi bir şey verdikten sonra diğer satıra nasıl geçeceğim.

Yani bir for döngüsü ile.

Kod: Tümünü seç

j:= length(ListBox1.Items[0]);/Burası nasıl olmalı..
        for i:= 0 > j  then begin
         memo1.Lines.Add(ListBox1.Items.[]);// Burası ne olmalı
     next;
         end;
Bir kelimenin anlamını öğretsen bile yeter..
ResimResim
Kullanıcı avatarı
vkamadan
Kıdemli Üye
Mesajlar: 1935
Kayıt: 17 Mar 2004 03:52
Konum: Adapazarı
İletişim:

Mesaj gönderen vkamadan »

Merhaba,

Kod: Tümünü seç

var
i:integer;
begin
for i:=0 to ListBox1.items.count-1 do
 begin
    if Length(Listbox1.items[i])=10 then //Burada 10 hane koşulunu verdin satıra
   Memo1.Lines.Add(ListBox1.items[i]);
 end;
end;
gibi kolay gelsin.
Volkan KAMADAN
www.polisoft.com.tr
Kullanıcı avatarı
conari
Üye
Mesajlar: 2102
Kayıt: 27 Nis 2006 03:10
Konum: İstanbul & Gebze Karışık

Mesaj gönderen conari »

Teşekkürler..
@Volkan
Bir kelimenin anlamını öğretsen bile yeter..
ResimResim
Cevapla