Treeview Çıktısı Almak

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
delphist
Üye
Mesajlar: 595
Kayıt: 05 Oca 2005 04:34

Treeview Çıktısı Almak

Mesaj gönderen delphist »

S.A.

Arkadaşlar Treeviewda Full Expand Edilmiş olan treeview içindeki verileri dallanmış haliyle quick report vb. bir rapor bileşeninde nasıl çıktısını veya başka bir yolu varsa çıktısını almak istiyorum. Yardımcı olursanız sevinirim.

Teşekkür Ederim...
oguzozturk74
Kıdemli Üye
Mesajlar: 574
Kayıt: 01 Şub 2004 12:29
Konum: Erdemli - MERSİN

Mesaj gönderen oguzozturk74 »

Treeview ın snapshot olarak bitmap resmini alıdıktan sonra print edebilirsin.. Yalnız treeview ın tüm node ları collapse yani açık olmalı.

Kod: Tümünü seç

var
  bmp: TBitmap;
begin
  bmp := TBitmap.Create;
  try
    bmp.Width := TreeView1.Width;
    bmp.Height := TreeView1.Height;
    bmp.Canvas.Lock;
    try
      TreeView1.Perform(WM_PRINT, bmp.Canvas.Handle, PRF_CHILDREN or
PRF_CLIENT or PRF_NONCLIENT);
    finally
      bmp.Canvas.UnLock;
      bmp.SaveToFile('d:\tree.bmp')
    end;
  finally
    bmp.Free
  end;
end;
Burada anahtar kelime WM_PRINT mesajını yakalmak.
Cevapla