LİSTEDEKİ ELEMENLERI SİLME

Listedeki Elemanları Silin
Listeye eklenen elemanları silmek için Button2 (Sil) düğmesi için kod yazacağım.Yazacağım kod listedeki seçili elemanı silecektir.Şİmdi Butona çift tıklayarak kodu yazın.


procedure TForm1.Button2Click(Sender:TObject);
begin
//Listedeki seçili elemanı silListview1.items.delete(Listview1.itemindex);
end;
end.


Programı Kapatacak Kodu Yazın

Şimdi Button3 (Çık) düğmesi için kullanacağımız ve aynı zamanda programdan çıkacak kodu yazıyorum.

procedure TForm1.Button3Click(Sender:TObject);
begin
//Programdan Çıkclose;
end;
end.


Programı Çalıştırın ve Test Edin

Şimdi F9 Tuşuna basın.Program çalışacaktır.ilgili Kutuları bilgi girin yada hazır olarak seçin ve ekle düğmesine basarak listeye eklenmesini sağlayın.

Çalışma Zamanı Hataları İçin Önlem Alın
Çalışma zamanında belirli şartların sağlanmaması durumunda programınız hata vericektir.Örneğin listeden eleman silmek için öncelikle bir elemanı seçme şartı vardır.Çünkü yazılan program satırı sadece seçili bir elemanı silmektedir.Eğer seçili eleman yoksa doğal olarak hata verecektir.

Bu durumun önüne geçmek için eğer kullanıcı eleman seçmemiş ise önce listeden elemanı seçmesini sağlyacağız.

Bunun için Button2(Sil) düğmesi için yazılan kodu aşağıdaki gibi düzenlememiz gerekecektir.


procedure TForm1.Button2Click(Sender: TObject);
begin
if Listview1.itemindex < 0 thenShowMessage('Önce Listeden Eleman Seçin!...')
else
//Listedeki seçili elemanı sil
Listview1.items.delete(Listview1.itemindex);
end;
end.