| oguzozturk74 | 13.03.2004 - 23:47:00 |
| ListBox üzerinde gezinirken mouse tıklamaksızın elemanların seçili görükmesi:
procedure TForm1.ListBox1MouseMove (Sender: TObject; Shift: TShiftState; X, Y: Integer); begin ListBox1.ItemIndex := ListBox1.ItemAtPos(Point(x,y), True); end; | |