Listbox ve Memo taşma sorunu [ÇÖZÜLDÜ]

[codder71]

Merhaba Arkadaşlar

Yazmakta olduğum projemde söyle bir sorunla karşılaştım. Listboxta bazı verileri listeliyorum ama bazen veriler biraz uzun olunca ekranda taşma oluyor. Bu verileri alt alta listeleme yapabilirmiyiz. Memodada buna benzer böyle bir sorun var veri girişi yaparken veri uzun ise ekrandan dışarı taşıyor. Benim istediğim ise ekrandan taşmadan bir alttan veri girişinin devam etmesi ama aklıma konuda bişey gelmedi. Bu sorunu çözen arkadaşlardan yardım bekliyorum.

Herkese teşekkürler iyi çalışmalar.

[barisatalay]

XE7 açık karşımda orada gördüğüm ile anlatayım;
TMemo nesnesinde TextSettings alanında WordWrap true olmalı

[codder71]

Barış bey teşekkür ederim söylediğiniz yöntem memo için işe yaradı şimdi listbox için bir çözüm arıyorum onun içinde bir çözüm bulurum inş.

[barisatalay]

Listboxdaki sorunu tam olarak anlayamadım ben

[SimaWB]

TListBoxItem'ın da WordWrap özelliği var. Belki işinize yarar...

[codder71]

Tesekkurler cevabiniz icin suan il disindayim eve gecince deniyecegim.

[codder71]

Simaweb soylediginiz gibi denedim ama olmadi
Kodu alttaki gibi kullandim veriyi aliyor ama wordwarp seklinde kullanmiyor eski lostbox'a nasil listeliyorsam o sekilde listeliyor. İsin kisasi degisen bisi olmadi benim icin

Kod: Tümünü seç

listboxitem.itemdata.text:=memo.text
Listboxitem.wordwap:=true

[codder71]

iyi günler arkadaslar
arkadaslar söyle bir kod kullanıyorum ama nedense işe yaramıyor.

Kod: Tümünü seç

var
item:Tlistboxitemm
begin
listboxitemm:=Tlistboxitem.create(listbox1);
listboxitemm.textsetting.wordwarp:=true;
listboxitemm.itemdata.text:=memo1.lines.text;
listbox1.addobject(listboxitemm);

bu kod listboxa ekleme yapıyor ama satırı sığdırma işlemini yapmıyor. üstatlardan yardım bekliyorum.
şimdiden teşekkürler

[codder71]

Arkadaslar yeni birşey farkettim bu listboxitemde wordwarp kodla oluşturduğumuz zaman çalışmıyor tasarım aşamasında oluşan listboxitem wordwarp gayet düzgün çalışıyor. Ama bana runtimeda listboxitemi oluşturmam gerekiyor. hala problemi çözemedim hiç aynı durum başına gelen yokmu ustalardan yardım beliyorum

[SimaWB]

Ben de test edince aynen sizin söylediklerinizi gördüm. Run-time'de eklediğimde WordWrap çalışmıyordu. Sonra design-time'da 2 ListboxItem'ın birisinin WordWrap özelliğini True, diğerinin False yapıp farklarını karşılaştırdım. WordWrap'ı true yaptığım Item'ın StyledSettings'inin otomatik olarak değiştiğini farkettim.

Sonuç olarak Listbox'a Item'ı eklemeden önce StyledSettings'inde değişiklik yapmak gerekiyor:

Kod: Tümünü seç

aItem.StyledSettings := aItem.StyledSettings - [TStyledSetting.Other];
listbox1.addobject(aItem);

[SimaWB]

Ben de test edince aynen sizin söylediklerinizi gördüm. Run-time'de eklediğimde WordWrap çalışmıyordu. Sonra design-time'da 2 ListboxItem'ın birisinin WordWrap özelliğini True, diğerinin False yapıp farklarını karşılaştırdım. WordWrap'ı true yaptığım Item'ın StyledSettings'inin otomatik olarak değiştiğini farkettim.

Sonuç olarak Listbox'a Item'ı eklemeden önce StyledSettings'inde değişiklik yapmak gerekiyor:

Kod: Tümünü seç

aItem.StyledSettings := aItem.StyledSettings - [TStyledSetting.Other];
listbox1.addobject(aItem);

[codder71]

Tesekkurler hocam eve gecince hemen deniyecegim.

[codder71]

hocam cok teşekkür ederim sorun çözülmüştür.