Delphi Listbox Ekleme

Delphi ListBox Ekleme: Kapsamlı Bir Kılavuz

Delphi’de bir ListBox, birden çok öğeyi görüntülemek ve bunların arasından seçim yapmak için kullanılan bir VCL (Görsel Bileşen Kütüphanesi) kontrolüdür. Kullanım kolaylığı ve çok yönlülüğü ile bilinir ve çeşitli uygulamalarda kullanıcı arayüzü öğesi olarak kullanılır.

Bu kapsamlı rehber, Delphi’de bir ListBox’ın nasıl ekleneceği, yapılandırılacağı ve kullanıcının etkileşimi için nasıl yapılandırılacağı konusunda adım adım talımatlar sağlayacaktır.

Adım 1: ListBox Bileşenini Ekleme

  1. Delphi Geliştirme Ortamını (IDE) açın.
  2. Araç Çubuklarından “Bileşen Paletini” açın.
  3. “Standart” sekmesine tıklayın.
  4. “CommonControls” bölümünü bulun ve “TListbox” öğesini seçin.
  5. Bileşeni, formunuzun istediğiniz konumuna tıklayıp ve sürükleme yapın.

Adım 2: ListBox’ı Yapılandırma

  1. ListBox’ı seçin ve Nesne Müfettişini açın.
  2. Items özelliklerini bulun ve öğelerin listesini girin. Her öğeyi yeni bir satıra girin.
  3. Style özelliklerini ayarlayın. “lsOwnerDrawFixed” seçeneği, öğelerin görünümünü manuel olarak kontrol etmenize olanak tanır.
  4. ItemHeight özelliklerini, öğelerin yüksekliğini ayarlayın.
  5. MultiSelect özelliklerini, kullanıcıların birden fazla öğe seçmesine olanak tanıyacak şekilde ayarlayın.

Adım 3: Kullanıcının Etkileşimi

  1. ListBox’ın OnClick olayını işleyin. Bu olay, kullanıcı bir öğeye tıkladığında tetiklenir.
  2. Olay işleyicisinde, seçilen öğeyi almak ve gerekli eylemi gerçekleştirmek için Selected özelliklerini kullanın.
  3. ListBox’ın OnSelect olayını işleyin. Bu olay, kullanıcı bir öğe seçtiğinde tetiklenir.
  4. Olay işleyicisinde, seçilen öğeyi almak ve gerekli eylemi gerçekleştirmek için SelCount ve ItemIndex özelliklerini kullanın.

Örnek Kod

Aşama 1-3’te açıklanan kavramları gösteren bir örnek kod aşağıda verilmektedir:

“`delphi
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants,
Classes, StdCtrls;

type
TForm1: TForm;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
// ListBox’a öğeler ekleme
listbox1.Items.Add(‘Öğe 1’);
listbox1.Items.Add(‘Öğe 2’);
listbox1.Items.Add(‘Öğe 3’);

// ListBox’ın görünümünü ayarlama
listbox1.Style := TListStyle.lsOwnerDrawFixed;
listbox1.ItemHeight := 25;
listbox1.MultiSelect := True;
end;

procedure TForm1.listbox1Click(Sender: TObject);
begin
// Seçilen öğeyi alma
ShowMessage(listbox1.Selected.Text);
end;

procedure TForm1.listbox1Select(Sender: TObject);
begin
// Seçilen öğelerin sayısını alma
ShowMessage(IntToStr(listbox1.SelCount));

// Seçilen öğenin indeksini alma
ShowMessage(IntToStr(listbox1.ItemIndex));
end;

end.
“`

İlgili Kaynaklar

Sonuç

Bu rehber, Delphi’de bir ListBox’ın nasıl ekleneceği, yapılandırılacağı ve kullanıcı etkileşimi için nasıl yapılandırılacağı konusunda kapsamlı bir açıklama sağlar. Bu bilgilerle, uygulamalarınıza güçlü ve kullanıcı dostu kullanıcı arayüzü öğeleri ekleyebilirsiniz.

Yayımlandı

kategorisi