treeview resim

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
mustafa_kaplan
Üye
Mesajlar: 38
Kayıt: 03 Tem 2003 01:39

treeview resim

Mesaj gönderen mustafa_kaplan »

Arkadaşlar treeview de açık itemlerin yanında açık bi kitap kapalılarda kapalı bi kitap tutmak istiyorum. Fakat bunu selectimage ile falan yapamadım. yani istediğim gibi olmuyor. Benim istediğim açık itemlerin resmi açık kitap olsun..

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

Mesaj gönderen mrmarman »

Merhaba...

- İstediğin şeyi rahatlıkla yapabilirsin.. Hatta dilersen 4 tane resim ile daha da zenginleştirebilirsin.. :idea:

- TreeView'in ImageList seçimini yaptığın nesne ImageList1 olsun

- ImageList1 içinde 0 numaralı resim Kapalı Kitap, 1 numaralı resim Açık Kitap olsun...

- Her Node'u için SelectedImage ve ImageIndex değerleri ile oynayarak bu resimlerden hangisini göstermek istersen seçebilirsin ki zaten bunu denemiş bulmuşsundur... Değer olarak -1 seçersen resim görüntülenmez, bu da ek bilgi... :wink:

- Zenginlik dediğim şeyle şunu kastetmiştim... Her durum için birer resim koysan
0: Kapalı Kitap - Seçili Değil (gri renkli)
1: Açık Kitap - Seçili Değil (gri renkli)
2: Kapalı Kitap - Seçili (renkli)
3: Açık Kitap - Seçili (renkli)

- Geriye TreeView'in OnExpanded ve OnCollapsed olaylarına aşağıdaki benzeri kodları yazmaya kalıyor...

Kod: Tümünü seç

procedure TForm1.TreeView1Expanded(Sender: TObject; Node: TTreeNode);
begin
  Node.ImageIndex    := 0; // Normal haldeyken resim
  Node.SelectedIndex := 0; // veya 2 // Seçili haldeyken resmi
end;

procedure TForm1.TreeView1Collapsed(Sender: TObject; Node: TTreeNode);
begin
  Node.ImageIndex    := 1; // Normal haldeyken resim
  Node.SelectedIndex := 1; // veya 3 // Seçili haldeyken resmi
end;
- Çalışmalarında başarılar... :o
Resim
Resim ....Resim
Cevapla