Ç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;