홍희석 wrote:
> 리스트 박스에서 멀티로 선택한후
> 다시 다른 리스트 박스에 넣는 방법좀...
>
>
도움이 되실지 모르겠습니다..
일단 멀티로 선택할 리스트박스의 속성중 multiselected 를 true로
바꾸고, 버튼 클릭시 리스트박스1에서 선택한 item들이 리스트박스2
로 add되도록 하는 간단한 코딩입니다..
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
begin
for i := 0 to (ListBox1.Items.Count - 1) do
begin
if ListBox1.Selected[i] then //선택한 item중 하나일 경우
begin
ListBox2.Items.Add(listbox1.Items[i]);
end;
end;
end;