鼠标右键判断是否为文件 为何不起作用 谢谢了(40分)

  • 主题发起人 主题发起人 fred_jing
  • 开始时间 开始时间
F

fred_jing

Unregistered / Unconfirmed
GUEST, unregistred user!
if Button=mbRight then
begin
if Assigned(ShellTreeView1.Selected) then
begin
if FileExists(String(ShellTreeView1.Selected.Data^)) then
begin
p:=Mouse.CursorPos;
PopupBackFile.Popup(p.X,p.Y);
end;
end;
end;
 
右键,按钮吗?如果是按钮MOUSEDOWN没问题
 
不是 是对话框
 
用ShellTreeView1.Selected.Data^ 改写为 ShellTreeView1.path
 
多人接受答案了。
 

Similar threads

后退
顶部