|
소스내용은 다음과 같구요...
void __fastcall TForm1::ListView1MouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
if( Button == mbRight )
{
Listpopupmenu->Popup(X,Y);
TPoint point1, point2;
point1.x = X;
point1.y = Y;
point2 = ClientToScreen( point1 );
Listpopupmenu->Popup( point2.x, point2.y );
}
}
이렇게했습니다.
그런데.. 팝업메뉴 위치가 이상하네요..
마우스오른쪽 클릭한 위치에 팝업메뉴가 나타나야 하는데.. 전체화면 상단에 나타납니다.
무엇인 문제인지 아시는분 좀 알려주세요..
그럼 수고하세용!!!!!
|