안녕하세여.. 타락임다..^^



Action List를 쓰세여..ㅠㅠ



사용법은 함 해보시면 앱니다..ㅠㅠ



타락천사...^_______^

지혀니 wrote:

> 왕초봅니다.. 무식하니 용감하게 질문합니다..

> 두개의 리스트 박스가 연결되어서

> 동시에 delete가 이루어지게 할 수 없을까요?

> 그러니까...

> 첫번째 리스트 박스 아이템이 0인것과 두번째 리스트 박스 아이템이 0인것이

> 한 리스트 박스에서 더블 클릭하면 동시에 그 아이템이 삭제될 수 있는 방법이 있을까요??

> 아무리 고민해봐도 해결이 안되어서 글을 올립니다...

> 그럼.. 훌륭한 답변을 기다리며.. ^^;



listbox1, listbox2라고 한다면

1.두개모두 더불클릭 이벤트를 같은 이름으로 만드시고용.

이름을 listbox1DBClick(sender : TObject); <- 프로시져 이름은 마음대로

2. listbox1과 listbox2의 더불클릭 이벤트를 listbox1DBClick; 으로 하세요

3. procedure TForm1.listbox1DBClick(sender : TObject);

// sender는 객체를 말함니다.

// 그러니깐 sender는 listbox1또는 listbox2를 모두 포함 할 수 있어용.

begin

if sender = listbox1 then 문장1

else sender = listbox2 then 문장2;

end;

// 문장1은listbox1에서 더불클릭 이벤트가

// 발생했을경우 원하는 job를 맹드셔용

// 문장2는listbox2에서 더불클릭 이벤트가

// 발생했을경우 원하는 job를 맹드셔용



그럼 많은 도움이 되길... zzz.