Listview Com Checkboxes

[Guest --samuelsjn --]

Olá Pessoal,

Estou precisando da ajuda de vocês.

Estou com uma ListView, que é a apresentação dos ganhadores de um sorteio.

A primeira coluna são os CheckBoxes, a segunda nome dos participantes, terceira coluna possui a data e a quarta coluna o valor....

Esta coluna esta ordenada pelo menor valor, o menor valor fica na primeira linha e o maior valor na última linha.

O menor valor será marcado no seu checkboxes. Caso houver um empate, nenhum checkboxes será marcado, mas, o sistema pedira para o usuário escolher um ganhador.

Até neste momento a minha ListView esta rodando. Agora que vem minha dúvida.

Só poderá ter um vencedor. Então como faço para marcar somente um checkboxes? Ex: Se eu marcar a segunda linha, esta sera a vencedora, e depois marcar a quarta linha, a segunda linha sera desmarcada e o vencedor agora sera a quarta linha. Entenderam (risos).

Pessoal, peço a ajuda de vocês....

Obrigado

[Churc]

Opa

Se eu entendi, você quer o seguinte, vamos supor que a Linha 2 do Listview esteja marcada, então se você marcar a quarta linha, a linha 2 será desmarcada certo?

Coloque este código no evento OnSelectItem da Listview

var
  i: Integer;
begin
  for i := 0 to ListView1.Items.Count - 1 do
  if (ListView1.Items.Item[i] <> Item) and (ListView1.Items.Item[i].Checked) then
  ListView1.Items.Item[i].Checked := False;

veja se é isto

abraço

[Guest --samuelsjn --]

Caro amigo Churc;

Seu código funcionou.

Apenas mais um detalhe, eu preciso selecionar a linha para que seu código funcione, pois ele esta no OnSlectItem

Teria como fazer, quando eu clicar no CheckBoxes, o que esta selecionado apague ("desmarque") e este novo marcado ficara selecionado. Pois só podera ter um vencedor.....

Obrigado...

[Sonildo Santos]

Opa

Para quem ainda tem problemas, basta colocar o código citado no evento OnItemCkecked da ListView