想写一个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、然后再读取这个单元格中的内容,再打开,应该不用说了吧?