Ruh Hali : Mesaj Sayısı : 952 Rep Puanı : 13489 Teşekkür Aldı : 0 Kayıt tarihi : 29/10/09 Nerden : Kocaeli/Gebze İş/Hobiler : MEsaj atmak :D Lakap : Sezo
Alt alta satırların girilebildiği, birçok özelliği bulunan bir kontroldür. Bu kontrolü formumuza component palette bulunan system sekmesinden ekleyebiliriz.
ListBox'ın Genel Özellikleri
Listbox1.Items : Listbox nesnesiyle ilgili tüm işlemlerin yapabildiğimiz en temel özelliğidir.
ListBox1.Items.Add: Listbox'a satır eklemek için kullanılır. Eklenen satır string türünde olmalıdır.
procedure TForm1.Button1Click(Sender: TObject);
begin
listbox1.Items.add(Edit1.text);
end;
ListBox1.Items.Clear: Listbox'da ki tüm satırları silmek için kullanılır.
procedure TForm1.Button2Click(Sender: TObject);
begin
listbox1.Items.delete;
end;
Listbox.Items.Count: Listbox içerisinde bulunan satırların sayısını verir. Aşağıdaki kod bloğu derlendiğinde listbox da bulunan satır sayısını hesaplayıp mesaj olarak verecektir.
procedure TForm1.Button1Click(Sender: TObject);
var
sayi:Integer;
begin
sayi:= ListBox1.Items.Count;//kaç satır var
Showmessage("Listbox da " + sayi + "satır var. ";
end;
ListBox1.Items.Delete: İstenilen satırı silmek için kullanılır. Öreneğin 3. Satırı silmek için listbox1.items.delete(2) kodu yazılır. 2 yazmamızın sebebi ise ilk satır numarasının �0� olmasıdır.
procedure TForm1.Button6Click(Sender: TObject);
begin
ListBox1.Items.Delete(2);//3. satırı sil
end;
ListBox1.Items.LoadFromFile: Parametre ile belirtilen adresteki dosyanın içeriğini listeye kopyalayan methoddur.
procedure TForm2.Button2Click(Sender: TObject);
begin
ListBox1.Items.LoadFromFile('c:\egitim.txt');
end;
ListBox1.Items.SaveToFile: ListBox'ın içeriğini parametre ile belirtilen adrese kopyalayan methoddur.