리스트박스 mousedown 이벤트에서 팝업메뉴를 쓰려고 하는데
공백일때와 item위에서의 구분이 잘안됩니다.
예를 들면
procedure TForm1.ListBox1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if listbox1.selected <> nil then
listbox1.PopupMenu := popupmenu1;
end;
end.
이런식으로 해볼려구하는데 트리뷰하고는 다르게 listbox에서는
selected가 잘안됩니다. 아시는분계시면 도움좀 부탁드립니다.
Selected는 선택된 아이템들을 가르키는 배열속성입니다... 트리뷰와는 달리 멀티셀렉트가 가능하기 때문에 속성이 다릅니다... 이거 대신에 선택된 아이템의 인덱스를 가르키는 ItemIndex속성을 이용하세요...
if ListBox1.ItemIndex <> -1 then
......
^^ 항상 즐코하세요...