Como saber qual item est� marcado no checklistbox ?

Question

Oi
Queria adicionar todos items que Estiver checados num ListBox Tem Como ?
Qualquer Dica e bem vinda

Carnette · Answer

procedure TForm1.Button3Click(Sender: TObject);
var
i : integer;
begin
for i:= 0 to CheckListBox1.Items.Count-1 do begin
if CheckListBox1.Checked[i] then showmessage(�� aqui�+#13+CheckListBox1.Items[i] );
end;
end;