OnCellClick:
if (...) then
StringGrid.Options := StringGrid.Options + [goEdting]
else
StringGrid.Options := StringGrid.Options - [goEdting];
if (...) then
StringGrid.Options := StringGrid.Options + [goEdting]
else
StringGrid.Options := StringGrid.Options - [goEdting];
解决方案 »
- 谈谈QQ、中国游戏中心等运作过程。
- 呼叫中心寻求兼职人员
- adotable读取大数据表的速度问题
- 用delphi能不能实现将一图片设置为屏幕的背景图片
- 请教高手!如何捕获数据库的异常信息并改变它的提示内容?
- 求:如何对文本(.Ini/.Txt)加密及解密?
- delphitreeview双击事件,怎么是只有双击子树有效
- 如何实现integer与real类型之间的转换?
- 如何用delphi+sql建立树形菜单+备注?各位帮帮忙啊,急!!!
- 怎么用语句给treeview控件的节点改名?
- 我是某全国发行的商业(行业管理)软件的作者。现在有一个问题(可能是有关BDE的,也有可能是有关于ACCESS的),搞得我....,谢谢。
- 市面上有无DELPHI的中文文档。
中就是条件。针对某列就可以。
begin
if Cells[2,2] = '你的条件' then
Options := Options - [goEditing]
else
Options := Options + [goEditing];
end;
如果有用,别忘了加分噢!