Listviewde 500 ile 1500 arası kayıt var, listviewde seçili olan satırın bilgilerini editlere geliyor, fakat Mouse tekerleği ile kaydırarak listview'e yukarı veya aşağıya gitmek istediğimde listview tepkiyi yaklaşık 7 saniye sonra veriyor. Aşağıdaki kodları kaldırdığımda sorun yok bu sorunu nasıl çözerim?
Kod: Tümünü seç
procedure TForm1.ListView1Click(Sender: TObject);
begin
RowNo.Text := ListView1.Selected.Caption;
Edit1t.Text := ListView1.Selected.SubItems[0];
Edit12.Text := ListView1.Selected.SubItems[1];
end;