DrogbA
Forum Üyesi
- Katılım
- 27 Ara 2020
- Mesajlar
- 3,440
- Tepkime puanı
- 0
- Puanları
- 36
C++ Builder 6 ile uyumludur. Windows gezgininde iken liste görünümüne geçtiğinizde dosyanın özelliklerini gösteren yapılar (isim listesi, boyutlar listesi,tür listesi,değiştirme tarihi listeleri vs) belirir. İşte bu listelerin boylarının uzunlukları yukarıdan header control nesnesi ile ayarlanır. Biz kullanıcılar olarak windows bu özellikleri göremediğimiz durumlarda çubuğun boyutunu uzatıp kısaltarak kendimiz için gerekli bilgileri görüyoruz. İşte bu programda benzer işlevi kendi programlarınızda yapabilmeniz amacıyla tasarlanmıştır. İçerisinde 3 adet ListBox bulunmakta, HeaderControl nesnesinin Section özelliğinden kaç adet sütun olacağı belirtilmelidir. Herbirinin başlığı ilgili Section parçasının(Section[0] gibi; listeyi oluşturunca zaten başlıkları tıklayarak da bu özellikleri görebilirsiniz) içine girilmelidir. Kaydırma işlemi otomaik değildir bu sebepten kullanıcı bir section'u boyutlandırmak istediğinde diğer tüm sectionların boyutlarının tekrardan ayarlanması gerekir. Aşağıdaki ana kod parçacağı (HeaderControl1SectionResize fonksiyonu) işte bu boyutlandırmanın tam olarak yapılabilmesi amacıyla yazılmııştır.
Kod:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Form1->ActiveControl=HeaderControl1;
ListBox1->Color=clCream;
ListBox1->Items->Add("Celal Atalar");
ListBox2->Items->Add("Bilgisayar Yüksek Mühendisi");
ListBox3->Items->Add("05054674468");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::HeaderControl1SectionResize(
THeaderControl *HeaderControl, THeaderSection *Section)
{
int secili=Section->Index;
int genislik=HeaderControl1->Sections->Items[secili]->Width;
if(secili==0)
{
ListBox1->Width=genislik;
ListBox2->Left=genislik;
ListBox3->Left=ListBox2->Left+ListBox2->Width;
}
else if(secili==1)
{
ListBox2->Width=genislik;
ListBox3->Left=ListBox1->Width+ListBox2->Width;
}
else if(secili==2)
{
ListBox3->Width=genislik;
}
}
//---------------------------------------------------------------------------
