Seleção de ListView

27/12/2005

Olá Pessoal. Td bem com vcs? :)

Estou com um problema. Estou utilizando uma ListView para imprimir as informações em banco de dados ao invés do DBGrid. Fiz os procedimentos normais de atualização do ListView e td funciona. Porém, criei um procedimento para localizar um determinado registro no banco que deveria localizar o registro e selecionar a linha correspondente, porém quando tento selecionar ele seleciona sempre o último registro.

Abaixo está o código:

begin
   if not ((DtSrc.DataSet.Bof) and (DtSrc.DataSet.Eof)) then
   begin
      DtSrc.DataSet.First;
      if DtSrc.DataSet.Locate(´CAMPO´, EdtCampo.Text, [loCaseInsensitive, loPartialKey&93;) then
      begin
         LstVw.ClearSelection;
         LstVwLista.Selected := LstVwLista.Items&91;DtSrc.DataSet.RecNo - 1&93;;
         LstVwLista.Selected.MakeVisible(True);
         LstVwLista.SetFocus;
         LstVwLista.Refresh;
      end
      else
         MessageDlg(´Nenhum registro foi encontrado!´, mtWarning, [mbOk&93;, 0);
   end
   else
      MessageDlg(´O cadastro está vazio!´, mtWarning, &91;mbOk&93;, 0);
end;


O que posso fazer para resolver o problema?

[b:237eb9235b]P.S.: Não sei se tem algo a ver, mas a ListView é multi-seleção.[/b:237eb9235b]

[]s,

Rafael cabral


Rafael Miguel