Q&A
- listview에서 힌트및 팝업메뉴를 보여줄때??
listview 에서 마우스가 가리키는 아이템에 따라 다른 힌트를 보여줄때 어떻게 해야하나염?
MoouseMove이벤트에서 어떻게 하는거 같은데 잘 이해가 안가네염... 마우스가 어는 아이템 위에 있는지 알수있는 함수가 있나염?
간단한 함수루틴있으면 알려주시길...
또한 리스트뷰에서 popup메뉴를 뛰우는데 아이템이 있는곳에서는 팝업메뉴가 뜨고 아이템이 없는곳에서는 마우스오른쪽버튼을 눌러도 팝업메뉴가 안뜨게 하는 방법좀 아시면 알려주세염... 지금은 편법으로 해놓았지만 이방법이 안맞는것 같아서 그럽니다.
현재 제가 한 소스는
procedure TfrmCon_0001.ListViewMembersMouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if Button = mbRight then
begin
if listviewMembers.Selected = nil then
begin
PopupMenu2.AutoPopup := False;
end
else
begin
PopupMenu2.AutoPopup := True;
end;
end;
end;
이와같이 select가 선택되면 팝업의 autopopup을 True로 하고 선택안되어지면 autopopup을 False로 두었습니다... 그런데 이렇게 하면 간간이 제가 원하지 않는 결과가 나오더라고요...
그람 오늘도 즐겁고 행복하시길...
MoouseMove이벤트에서 어떻게 하는거 같은데 잘 이해가 안가네염... 마우스가 어는 아이템 위에 있는지 알수있는 함수가 있나염?
간단한 함수루틴있으면 알려주시길...
또한 리스트뷰에서 popup메뉴를 뛰우는데 아이템이 있는곳에서는 팝업메뉴가 뜨고 아이템이 없는곳에서는 마우스오른쪽버튼을 눌러도 팝업메뉴가 안뜨게 하는 방법좀 아시면 알려주세염... 지금은 편법으로 해놓았지만 이방법이 안맞는것 같아서 그럽니다.
현재 제가 한 소스는
procedure TfrmCon_0001.ListViewMembersMouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if Button = mbRight then
begin
if listviewMembers.Selected = nil then
begin
PopupMenu2.AutoPopup := False;
end
else
begin
PopupMenu2.AutoPopup := True;
end;
end;
end;
이와같이 select가 선택되면 팝업의 autopopup을 True로 하고 선택안되어지면 autopopup을 False로 두었습니다... 그런데 이렇게 하면 간간이 제가 원하지 않는 결과가 나오더라고요...
그람 오늘도 즐겁고 행복하시길...
2
COMMENTS
-
-
저두 이 비슷한걸 질문을 할려다가 혼자 낑깅대고 있습니다.
listview에 각 item별로 팝업이 이나 힌트가 뜨는건 알고 있는데.
서브 메뉴별로 팝업이 뜨구 힌트가 뜨는방법을 모르겠더군요.
grid는 각 서브메뉴별로 rect의 내용을 가지고 있는 이넘의 listview는
caption부분의 내용만 가지고 있고 각 caption의 서브메뉴에 대한 정보는
tstring의 내용으로 일괄적으로 처리를 해버리는데
한 item의 각 서브에 각각의 힌트와 각각의 팝업을 연결시킬수는 없는지요
caption : data1 : data2 : data 3 이라는 columns가 있을경우
item1 sub1 sub2 sub3 이 있다구 할때 item1에 팝업과 힌트
sub1에 다른 팝업과 힌트 sub2또 같구 sub3또한 다른 팝업과 다른 힌트를
줄수는 없는지요 grid같은 경우는 onclick나 onmousedown에서 어떤걸 선택을 했는지를
알수 잇는데 listview는 --+ 알길이 없기에 질문을 드립니다.
조건일 wrote:
> 리스트 뷰는 쓰면 쓸수록 재미있는 컴포넌트죠....
> 많이 쓰다보면 정말로 잘만들어진 컨트롤이구나라는 감탄사가 나옴니다...
> 근데 이 리스트 뷰는 메뉴얼에도 그 사용법이 상세하게 또는 사용법 별로
> 나와 있찌도 않습니다... 걍 닭질끝에 이것저것 시간양념과 고민 쏘쓰를 곁들여
> 알아낸 방법이죠... 뭐 알구 보면 간단해여....
>
> 님께서 궁금해 하시는 것을 차근 차근 풀어 보면...
>
> > 또한 리스트뷰에서 popup메뉴를 뛰우는데 아이템이 있는곳에서는 팝업메뉴가 뜨고 아이템이 없는곳에서는 마우스오른쪽버튼을 눌러도 팝업메뉴가 안뜨게 하는 방법좀 아시면 알려주세염... 지금은 편법으로 해놓았지만 이방법이 안맞는것 같아서 그럽니다.
>
> Solve ->
> procedure ListView1OnClick(Sender : TObject);
> begin
> if ListView1.SelCount < 1 then
> begin
> exit;
> end;
> ShowPopupMenu(ListView1.Selected);
> end;
>
> 정도루 처리하믄 해결될것 같군여....
> 다음으로...
> > listview 에서 마우스가 가리키는 아이템에 따라 다른 힌트를 보여줄때 어떻게 해야하나염?
> > MoouseMove이벤트에서 어떻게 하는거 같은데 잘 이해가 안가네염... 마우스가 어는 아이템 위에 있는지 알수있는 함수가 있나염?
>
> Solve->
> procedure ListView1MouseDown(Sender : TObejct; Button : TMouseButton; Shift : TShiftState; X, Y : Integer);
> var item : TListItem;
> begin
> item := ListView1.GetItemAt(X, Y);
> if item <> nil then
> ShowPopupMenu(item);
> end;
>
> 정도루 다가 해결될수 있겠씸미다...
> 왜 그런지는 님께서 고민하시기 바랍니다... 한번 심도있게 고민 해봐야..
> 잘쓸수 있으니까여...
> 윈도그에서는 안어울리는 말이지만...
>
> At your own Risk~!
>
> 즐프하셔염.........
>
>
>
> 유승완 wrote:
> > listview 에서 마우스가 가리키는 아이템에 따라 다른 힌트를 보여줄때 어떻게 해야하나염?
> > MoouseMove이벤트에서 어떻게 하는거 같은데 잘 이해가 안가네염... 마우스가 어는 아이템 위에 있는지 알수있는 함수가 있나염?
> >
> > 간단한 함수루틴있으면 알려주시길...
> >
> > 또한 리스트뷰에서 popup메뉴를 뛰우는데 아이템이 있는곳에서는 팝업메뉴가 뜨고 아이템이 없는곳에서는 마우스오른쪽버튼을 눌러도 팝업메뉴가 안뜨게 하는 방법좀 아시면 알려주세염... 지금은 편법으로 해놓았지만 이방법이 안맞는것 같아서 그럽니다.
> >
> > 현재 제가 한 소스는
> >
> > procedure TfrmCon_0001.ListViewMembersMouseDown(Sender: TObject;
> > Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
> > begin
> > if Button = mbRight then
> > begin
> > if listviewMembers.Selected = nil then
> > begin
> > PopupMenu2.AutoPopup := False;
> > end
> > else
> > begin
> > PopupMenu2.AutoPopup := True;
> > end;
> >
> > end;
> >
> >
> > end;
> >
> > 이와같이 select가 선택되면 팝업의 autopopup을 True로 하고 선택안되어지면 autopopup을 False로 두었습니다... 그런데 이렇게 하면 간간이 제가 원하지 않는 결과가 나오더라고요...
> >
> > 그람 오늘도 즐겁고 행복하시길...
(NOTICE) You must be logged in to comment on this post.
-
- 델초보
- •
- 2001.10.08 20:10
- 2 COMMENTS
- /
- 0 LIKES
-
나그네•2001.10.08 21:081.필드를 스트링형(파라독스에서는 A 타입)으로 합니다. 길이는 체크박스의 갯수에 따라 결정합니다. 체크...
-
irookie•2001.10.08 20:26이런 방법이 있을 수 있겠죠 var str : string; str := ''; if CheckBox1.Checked then str...
-
- 문상연
- 2001.10.08 20:08
- 0 COMMENTS
- /
- 0 LIKES
-
- 어린왕자A
- 2001.10.08 19:58
- 0 COMMENTS
- /
- 0 LIKES
-
- 라엘^^
- •
- 2001.10.08 19:51
- 2 COMMENTS
- /
- 0 LIKES
-
하기•2001.10.08 22:28아마도 님이 사용하신 방법은 SubForm.Showmodal;인것 같은데요... ^^; SubForm.Show;를 사용해 보세요....
-
라엘^^•2001.10.09 21:17Show를 사용했더니 에러는 없는데... 창이 안뜨네요~~~ 작동은 하는것 같은데 보이지는 않아요~~~ 죄송하...
-
- 허접
- •
- 2001.10.08 19:33
- 1 COMMENTS
- /
- 0 LIKES
-
이성훈•2001.10.08 20:00저는 전에 LG스마트폰으로 작업을 한적이 있는데.. 자세히는 모르지만 아마 통신회사와 같이 작업을 하여...
-
- 정성훈
- 2001.10.08 19:27
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보임다.
- 2001.10.08 19:24
- 0 COMMENTS
- /
- 0 LIKES
-
- 나지영
- 2001.10.08 19:03
- 0 COMMENTS
- /
- 0 LIKES
-
- 폭설
- •
- 2001.10.08 18:38
- 1 COMMENTS
- /
- 0 LIKES
-
어린왕자A•2001.10.08 22:33한델연(www.delphi.or.kr)에서 엘로우페이지의 끝부분에..ADOExpress패치라고 있을 꺼예요.. 폭설 wrote...
-
- 정규성
- •
- 2001.10.08 18:01
- 2 COMMENTS
- /
- 0 LIKES
-
델 초보(아줌마)•2001.10.08 19:23정규성 wrote: > query2.SQL.clear; > query2.sql.add('select * from home'); > query2.SQL....
-
정성훈•2001.10.09 00:02델 초보(아줌마) wrote: > 정규성 wrote: > > query2.SQL.clear; > > query2.sql.add('select * fr...
-
- 초보자
- •
- 2001.10.08 17:49
- 1 COMMENTS
- /
- 0 LIKES
-
초보•2001.10.08 18:15캡션에 대입후에 패널.update를 해보세요... 초보자 wrote: > panel의 caption 에다가 쿼리값을 넣어주...
-
- 구자균
- •
- 2001.10.08 13:12
- 1 COMMENTS
- /
- 0 LIKES
-
하기•2001.10.08 22:33검색에서 DBGrid를 치시고 한번 찾아 보세요... 유사하거나 또는 같은 답이 나와 있던것 같던데... ^^; ...
-
- 초보
- •
- 2001.10.08 06:35
- 5 COMMENTS
- /
- 0 LIKES
-
홍성락•2001.10.08 20:07초보 wrote: > 지난번에 이런 질문에 답변을 주셨는데 잘 안되서 다시 질문을 올립니다. > > 두점의 위...
-
초보•2001.10.08 23:13매번 이렇게 답변해 주시니 진심으로 감사드립니다. 두 점을 가지고 호를 그릴 수 있는 방법은 없겠지요 ?...
-
홍성락•2001.10.08 23:46...
-
초보•2001.10.09 00:44홍성락 wrote: > ...
-
이성훈•2001.10.08 18:20델파이에서 지원하는 함수Chord(원뿔), arc(호)를 이용하면 될것같은데요 Help에 예제가 있으니깐 참고하...
-
- 유승완
- •
- 2001.10.08 06:48
- 2 COMMENTS
- /
- 0 LIKES
listview 에서 마우스가 가리키는 아이템에 따라 다른 힌트를 보여줄때 어떻게 해야하나염? MoouseMove이벤트에서 어떻게 하는거 같은데 잘 이해가 안가네염... 마우스가 어는 아이템 위에 있는지 알수있는 함수가 있나염? 간단한 함수루...-
조건일•2001.10.08 11:21리스트 뷰는 쓰면 쓸수록 재미있는 컴포넌트죠.... 많이 쓰다보면 정말로 잘만들어진 컨트롤이구나라는 감...
-
개허접•2001.10.08 11:44저두 이 비슷한걸 질문을 할려다가 혼자 낑깅대고 있습니다. listview에 각 item별로 팝업이 이나 힌트가 ...
-
- 초보
- 2001.10.08 06:36
- 0 COMMENTS
- /
- 0 LIKES
-
- 태균
- •
- 2001.10.08 05:10
- 1 COMMENTS
- /
- 0 LIKES
-
자유지역•2001.10.08 05:48이부분을 이렇게하면 가능할 것 같습니다.. for문 보다는 while 문이 간단하니까 While 로 하시는게 좋을 ...
-
- 자유지역
- 2001.10.08 03:40
- 0 COMMENTS
- /
- 0 LIKES
-
- 왕초버
- •
- 2001.10.08 01:43
- 3 COMMENTS
- /
- 0 LIKES
-
탁발승•2001.10.08 04:57haksa라...........^^ 혹시 대학 전산소인가염.......? 저희두 haksa가 있는뎀........^^ 저겨...... 이...
-
왕초버•2001.10.08 06:55우선 답변 감사 드립니다. 대학전산소는 아니고요 혼자서 학사행정에 관한 프로그램을 만들어 보고 있습니...
-
왕초버•2001.10.08 06:54우선 답변 감사 드립니다. 대학전산소는 아니고요 혼자서 학사행정에 관한 프로그램을 만들어 보고 있습니...
-
- 초보맨
- •
- 2001.10.07 07:19
- 1 COMMENTS
- /
- 0 LIKES
-
쿨최•2001.10.31 03:39델파이 5.0의 기본 컴포로만 작성했다면 당근 6.0에서 컴파일됩니다. 추가 있습니다컴포를 설치했다면 좀 ...
-
- dskang
- 2001.10.07 01:56
- 0 COMMENTS
- /
- 0 LIKES
많이 쓰다보면 정말로 잘만들어진 컨트롤이구나라는 감탄사가 나옴니다...
근데 이 리스트 뷰는 메뉴얼에도 그 사용법이 상세하게 또는 사용법 별로
나와 있찌도 않습니다... 걍 닭질끝에 이것저것 시간양념과 고민 쏘쓰를 곁들여
알아낸 방법이죠... 뭐 알구 보면 간단해여....
님께서 궁금해 하시는 것을 차근 차근 풀어 보면...
> 또한 리스트뷰에서 popup메뉴를 뛰우는데 아이템이 있는곳에서는 팝업메뉴가 뜨고 아이템이 없는곳에서는 마우스오른쪽버튼을 눌러도 팝업메뉴가 안뜨게 하는 방법좀 아시면 알려주세염... 지금은 편법으로 해놓았지만 이방법이 안맞는것 같아서 그럽니다.
Solve ->
procedure ListView1OnClick(Sender : TObject);
begin
if ListView1.SelCount < 1 then
begin
exit;
end;
ShowPopupMenu(ListView1.Selected);
end;
정도루 처리하믄 해결될것 같군여....
다음으로...
> listview 에서 마우스가 가리키는 아이템에 따라 다른 힌트를 보여줄때 어떻게 해야하나염?
> MoouseMove이벤트에서 어떻게 하는거 같은데 잘 이해가 안가네염... 마우스가 어는 아이템 위에 있는지 알수있는 함수가 있나염?
Solve->
procedure ListView1MouseDown(Sender : TObejct; Button : TMouseButton; Shift : TShiftState; X, Y : Integer);
var item : TListItem;
begin
item := ListView1.GetItemAt(X, Y);
if item <> nil then
ShowPopupMenu(item);
end;
정도루 다가 해결될수 있겠씸미다...
왜 그런지는 님께서 고민하시기 바랍니다... 한번 심도있게 고민 해봐야..
잘쓸수 있으니까여...
윈도그에서는 안어울리는 말이지만...
At your own Risk~!
즐프하셔염.........
유승완 wrote:
> listview 에서 마우스가 가리키는 아이템에 따라 다른 힌트를 보여줄때 어떻게 해야하나염?
> MoouseMove이벤트에서 어떻게 하는거 같은데 잘 이해가 안가네염... 마우스가 어는 아이템 위에 있는지 알수있는 함수가 있나염?
>
> 간단한 함수루틴있으면 알려주시길...
>
> 또한 리스트뷰에서 popup메뉴를 뛰우는데 아이템이 있는곳에서는 팝업메뉴가 뜨고 아이템이 없는곳에서는 마우스오른쪽버튼을 눌러도 팝업메뉴가 안뜨게 하는 방법좀 아시면 알려주세염... 지금은 편법으로 해놓았지만 이방법이 안맞는것 같아서 그럽니다.
>
> 현재 제가 한 소스는
>
> procedure TfrmCon_0001.ListViewMembersMouseDown(Sender: TObject;
> Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
> begin
> if Button = mbRight then
> begin
> if listviewMembers.Selected = nil then
> begin
> PopupMenu2.AutoPopup := False;
> end
> else
> begin
> PopupMenu2.AutoPopup := True;
> end;
>
> end;
>
>
> end;
>
> 이와같이 select가 선택되면 팝업의 autopopup을 True로 하고 선택안되어지면 autopopup을 False로 두었습니다... 그런데 이렇게 하면 간간이 제가 원하지 않는 결과가 나오더라고요...
>
> 그람 오늘도 즐겁고 행복하시길...