TListBox Nesnelerini Seçili Göstermek

Yazdığınız makaleleri ve üyelerimizin işine yarayacağını düşündüğünüz kodlarınızı gönderebilirsiniz. Bu foruma soru sormayın!
Cevapla
RamazanG
Üye
Mesajlar: 73
Kayıt: 16 Tem 2010 02:38

TListBox Nesnelerini Seçili Göstermek

Mesaj gönderen RamazanG » 26 Eyl 2010 10:26

Makale: Zarko Gajic.
Çeviri: Ramazan Gülbahar.

TListBox Fareyle Nesneler Üzerinde Gezerken Sanki Fare Nesneye Tıklamış Gibi Nesneyi Seçili Gösterir ve Arka Planı Renklendirir.

Aşşağıdaki Kodu OnMouseMove olayına yazın.

Kod: Tümünü seç

procedure TForm1.ListBox1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer) ;
begin
   ListBox1.ItemIndex := ListBox1.ItemAtPos(Point(x,y), True) ;
end;

Cevapla