Valeu pela Ajuda Obrigado a todos
--- Em delphi-br@yahoogrupos.com.br, SERGIO LOPES <moro...@...> escreveu
>
>
> //0 - item 1
> //1 - item 2
>
> if lista.ItemIndex = 0 then
> lista.Checked[1] := lista.Checked[0] = false;
>
> if lista..ItemIndex = 1 then
> lista.Checked[0] := lista.Checked[1] = false;
>
> //esse codigo quando vc desmarca o item 1 o dois vai marcar
> autormaticamente e vice-versa. a propriedade itemindex informa em qual item o
> cursor esta no momento dai é só fazer a checagem do outro item que vc quer
> tratar.;
>
> --- Em sáb, 7/8/10, Darkzad <dark...@...> escreveu:
>
> De: Darkzad <dark...@...>
> Assunto: Re: [delphi-br] Re: Ajuda com Checklistbox
> Para: delphi-br@yahoogrupos.com.br
> Data: Sábado, 7 de Agosto de 2010, 10:26
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
> Entendi,
>
>
>
> Olha se esse código ajuda.
>
>
>
> if (CheckListBox1.Checked[1]) AND (CheckListBox1.Checked[2]) then
>
> if (CheckListBox1.Selected[1]) then
>
> CheckListBox1.Checked[2] := False
>
> else if (CheckListBox1.Selected[2]) then
>
> CheckListBox1.Checked[1] := False
>
> else if (CheckListBox1.Checked[1]) then
>
> CheckListBox1.Checked[2] := False
>
> else if (CheckListBox1.Checked[2]) then
>
> CheckListBox1.Checked[1] := False;
>
>
>
> []'s
>
>
>
> Em 07-08-2010 09:28, rodrigo escreveu:
>
> >
>
> > eu fiz isso, mas o problema é o seguinte:
>
> > se o item 1 ta selecionado e eu clicar para selecionar o item 2, não
>
> > funciona com o código abaixo, pois ele vai ver que o 1 ta selecionado
>
> > e vai desselecionar o item dois antes de verificar o se o item 2 ta
>
> > selecionado
>
> >
>
> > if CheckListBox1.Checked[1] then
>
> > CheckListBox1.Checked[2] := False;
>
> >
>
> > if CheckListBox1.Checked[2] then
>
> > CheckListBox1.Checked[1] := False;
>
> > Como acertar isso?
>
> >
>
> > --- Em delphi-br@yahoogrupos.com.br
>
> > <mailto:delphi-br%40yahoogrupos.com.br>, Darkzad <darkzad@> escreveu
>
> > >
>
> > > No evento OnclickCheck vc verfica se o item1 está selecionado.
>
> > >
>
> > > if CheckListBox1.Checked[1] then
>
> > > CheckListBox1.Checked[2] := False;
>
> > >
>
> > > Não esqueça que a array começa do Zero.
>
> > >
>
> > > []'s
>
> > >
>
> > >
>
> > > Em 06-08-2010 19:53, rodrigo escreveu:
>
> > > >
>
> > > > Olá, tenho um checklistbox onde tenho dois vários itens, mas tem dois
>
> > > > que são mutuamente excludentes, isto é quando um for selecionado o
>
> > > > outro tem que estar sem seleção, como posso fazer isso automático,
>
> > > > para que quando meu usuario selecionar o item1, o item2 perca a
>
> > > > seleção e vice-versa.
>
> > > >
>
> > > > Desde já agradeço
>
> > > >
>
> > > >
>
> > >
>
> > >
>
> > >
>
> > > [As partes desta mensagem que não continham texto foram removidas]
>
> > >
>
> >
>
> >
>
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>