Fórum Marcar items no checklistbox #591102

04/02/2018

0

olá a todos preciso de ajuda de novo

tenho um checklistbox1 e um listbox1, no checklistbox1 tem 5 items e no listbox1 tem 3 como faço para que no evento oncreate do form somente os items existente no listbox seja marcados no checklistbox1.

Este codigo abaixo marca os 3 primeiros items do checklistbox1
 for I := 0 to ListBox1.Items.Count -1 do  begin
   if CheckListBox1.Items.IndexOf(ListBox1.Items.Strings[i]) > 0 then
      CheckListBox1.Checked[i] := true
  end;
Cgm2k7 2013

Cgm2k7 2013

Responder

Posts

04/02/2018

Jerson Boer

Cgm2k7 2013, segue código:

for I := 0 to lstTeste.Items.Count - 1 do
    begin
      if chklstTeste.Items.IndexOf(lstTeste.Items.Strings[i]) >= 0  then
        begin
          chklstTeste.Checked[chklstTeste.Items.IndexOf(lstTeste.Items.Strings[i])] := true;
        end;
    end;
Responder

Gostei + 0

05/02/2018

Cgm2k7 2013

vlw irmão muito obrigado, deu certo aqui...
vlw
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar