ListView1 automatyczne ustawienia scrola

[Darek_C++]

Witam ponownie,
do wyszukania pozycji w ListView1 używam takiego kodu:

Kod: Zaznacz cały

void __fastcall TForm1::Button3Click(TObject *Sender)
{
   //Wyszukaj
   for(int ii=0; ii < ListView1->Items->Count; ii++)
   {
      String adres;
      adres = ListView1->Items->Item[ii]->SubItems->Strings[0].Trim();
      if(adres.Pos(Edit3->Text.Trim())>0)
      {
         ListView1->Items->Item[ii]->Selected = true;
                        ListView1->Scroll(0,(ii*14)); //Dodane jako rozwiÄ…zanie
         ShowMessage("Znaleziono: "+ (String) ii);
         ListView1->SetFocus();
         return;
      }

   }
}

Po wyszukaniu dana pozycja zostanie zaznaczona ListView1->Items->Item[ii]->Selected = true;
Pytanie brzmi czy jest sposób aby automatycznie przesunąć scrol tak aby zaznaczona pozycja ustawiła się na górze ? Czyli chodzi o to, że jak jest lista długa trzeba ręcznie przesuwać scrolem w poszukiwaniu zaznaczonej pozycji i chciałem to wyeliminować

-----
Rozwiązanie jakie sam znalazłem to ListView1->Scroll(0,(ii*14));

[Cyfrowy Baron]

RozwiÄ…zaniem problemu jest funkcja MakeVisible(BOOL):

Kod: Zaznacz cały


   for(int ii = 0; ii < ListView1->Items->Count; ii++)
   {
      String adres;
      adres = ListView1->Items->Item[ii]->SubItems->Strings[0].Trim();
      if(adres.Pos(Edit3->Text.Trim()) > 0)
      {
        ListView1->Items->Item[ii]->Selected = true;

        if(ListView1->Selected) ListView1->Selected->MakeVisible(false);

         ShowMessage("Znaleziono: "+ (String) ii);
         ListView1->SetFocus();
         return;
      }

   }
 

Jeżeli chcesz zaznaczać nie tylko pierwszą kolumnę lecz cały wiersz, to właściwość RowSelect obiektu ListView1 ustaw na true. Uprzedzając ewentualne pytanie, obiekt typu TListView nie obsługuje zaznaczania SubItems (kolejnych kolumn) bez zaznaczenia pierwszej kolumny.