Combobox 30 ise 50 tane Edit'ten 30 tanesi görünür olsun

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
@kiF
Üye
Mesajlar: 15
Kayıt: 11 Kas 2005 10:21
Konum: İST

Combobox 30 ise 50 tane Edit'ten 30 tanesi görünür olsun

Mesaj gönderen @kiF »

Combobox 'tan örneğin 26 'yı seçtiğimde,
mevcut 50 adet Edit'en 26 tanesi görünür kalacak.
Mümkün müdür? Teşekkürler
--
Kullanıcı avatarı
doctorfunks
Üye
Mesajlar: 105
Kayıt: 26 Oca 2005 10:37
Konum: İstanbul

slm

Mesaj gönderen doctorfunks »

if combobox1.itemindex = 26 then
begin

1-//edit1.visible := False; böyle tek tek
2-//edit component sayısı kadar döndür name' e göre visible false at.

end;
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

Edit'lerin isimleri sıralı numara içeriyorsa işin kolay...

- ComboBox'un içerdiği numarayı Integer tipine dönüştürüp bir değişkene atıcan.

- Edit sayısı kadar (örneğinde 50) bir FOR döngüsü kurup, döngü sayacı değişkene atadığın rakama eşit veya küçükse, döngü sayacıncı Edit'in visible özelliğini True, aksi ise False yapıcan.

- Edit'leri bulmak için FindComponent fonksiyonu kullanıcan...

Örnek : Formunda Edit1 varsa aşağıdaki kod 'Edit'+'1' = Edit1 döndürür.

Kod: Tümünü seç

   TEdit(FindComponent('Edit' + IntToStr(1) )).Visible := True;
- 1 yerine döngü sayacını koyabilirsin... :idea: Tutmayı öğrendik, gelsin balıklar... :lol:

- Başarılar.
Resim
Resim ....Resim
@kiF
Üye
Mesajlar: 15
Kayıt: 11 Kas 2005 10:21
Konum: İST

Mesaj gönderen @kiF »

Aradığım buydu, teşekkürler. Balıkları tutmaya başlayabilirim :D
--
Cevapla