如何在StringGrid控件中通过双击单元格来打开文件,单元格内为文件的路径.(100分)

  • 主题发起人 主题发起人 makilyang
  • 开始时间 开始时间
M

makilyang

Unregistered / Unconfirmed
GUEST, unregistred user!
如,单元格的值为F:/xxx.rm。双击就可以打开该文件进行观看,
 
Winexec(PChar(Stringgrid1.Cells[Stringgrid1.col,StringGrid1.row]),sw_Shownormal);
 
想写一个Real啊?^_^
可以这样的:
1、先定义一个函数来确定那个单元格被选中:
function IsCellSelected(StringGrid : TStringGrid; X, Y : LONGINT): BOOLEAN;
begin
Result := false;
try
if (X >= StringGrid.Selection.Left) and (X <= StringGrid.Selection.Right) and (Y >= StringGrid.Selection.Top) and (Y <= StringGrid.Selection.Bottom)
then
Result := true;
except
end;
end;

2、然后再读取这个单元格中的内容,再打开,应该不用说了吧?

 
多人接受答案了。
 

Similar threads

D
回复
0
查看
871
DelphiTeacher的专栏
D
D
回复
0
查看
930
DelphiTeacher的专栏
D
D
回复
0
查看
945
DelphiTeacher的专栏
D
D
回复
0
查看
777
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部