我把stringgrid控件里初设了一些常用参数,但有时候要修改这些参数数值,可以手动去修改参数,但鼠标一点表格就又变回原来的了,请问我该怎么办哦,很急,真的很急,在线等或加QQ514233301!可以有偿!
解决方案 »
- ehlib 在有过滤功能时 数据源 adoquery close open 报异常 无法捕捉
- 字段显示问题
- WebBrowser 里面 打开的图片(验证码),如何保存到本地?(不要下载的,临时文件夹里面也没有)
- Access数据库设密码后,如何到delphi中连接调用
- 求教各位兄弟,如何在Win98客户端获取服务器的硬盘序列号呢?
- TWebBrowser的问题,请赶紧来解决一下我出100分
- 关于嵌入到outlook中的控件的问题
- 各位老兄,本人开发的"中小学成绩统计管理软件"已初步完成,帮我找找BUG.
- 在query提交数据库后,有什么效率高一些的方法来刷新前台的dbgrid等控件呢
- 高分求一段程序,分最高可加到800分,目前只能加275分,不够可再开贴子加,敬请各位英雄关注!!!!绝不食言!!
- Delphi 7.0 能调用SAPI 5.4 吗?
- Delphi5无法安装问题
可以留个联系方式吗procedure TForm3.table3Click(Sender: TObject);
begin
Table3.cells[0,0]:=' 外电参数';
Table3.cells[1,0]:=' 数值';
Table3.cells[0,1]:='外电系统归算阻抗(欧)';
Table3.cells[0,2]:='主变压器低压侧归算阻抗(欧)';
Table3.cells[0,3]:='主变电所线路阻抗(欧)';
Table3.cells[0,4]:='主变所35kV接地电阻(欧)';
Table3.cells[0,5]:='全线最大配电变容量';
Table3.cells[0,6]:='主回路滤波器电感(毫亨)';
Table3.cells[0,7]:='主回路滤波器电阻(欧)';
Table3.cells[0,8]:='主变容量(MVA)';
Table3.cells[0,9]:='基准容量(MVA)';
Table3.cells[0,10]:='短路容量(MVA)';
Table3.cells[0,11]:='电力系统阻抗标幺值';
Table3.cells[0,12]:='主变阻抗标幺值';
Table3.cells[0,13]:='自投装置最大延时';
Table3.cells[0,14]:='环网最大延时';
Table3.cells[0,15]:='主变阻抗百分比';
Table3.cells[0,16]:='110kV线路阻抗标幺值';
Table3.cells[0,17]:='整流变短路阻抗百分比';
Table3.cells[4,17]:='35kV线路阻抗标幺值/km(150截面)';
Table3.cells[2,16]:='35kV线路阻抗标幺值/km(240截面)';
Table3.cells[2,17]:='35kV线路阻抗标幺值/km(400截面)';
Table3.cells[4,16]:='35kV线路阻抗标幺值/km(500截面)';
Table3.cells[2,0]:=' 电缆参数';
Table3.cells[3,0]:=' 数值';
Table3.cells[4,0]:=' 基准参数';
Table3.cells[5,0]:=' 数值';
Table3.cells[2,1]:='接触网单位电阻(欧/公里)';
Table3.cells[2,2]:='钢轨单位电阻(欧/公里)';
Table3.cells[2,3]:='架空地线单位电阻(欧/公里';
Table3.cells[2,4]:='正馈线直流电缆单位电阻(欧/公里)';
Table3.cells[2,5]:='回流线直流电缆单位电阻(欧/公里)';
Table3.cells[2,6]:='35kV交流电缆单位电阻(欧/公里)';
Table3.cells[2,7]:='单芯电缆铜屏蔽线单位电阻(欧公里)';
Table3.cells[2,8]:='钢轨对地泄露阻抗(欧/公里)';
Table3.cells[2,9]:='接地电阻(欧)';
Table3.cells[2,10]:='主所最远外线长度(1)';
Table3.cells[2,11]:='主所最远外线长度(2)';
Table3.cells[2,12]:='35kV线路阻抗标幺值/km(300截面)';
Table3.cells[2,13]:='35kV线路阻抗标幺值/km(120截面)';
Table3.cells[2,14]:='35kv线路阻抗标幺值/km(95截面)';
Table3.cells[2,15]:='配电变短路阻抗百分比';
Table3.cells[4,1]:='主所1与主所2支援供电线缆长度(km)';
Table3.cells[4,2]:='均流电缆电阻(欧/处)';
Table3.cells[4,3]:='接地引下线电阻(欧/处)';
Table3.cells[4,4]:='城网额定电压';
Table3.cells[4,5]:='城网基准电压';
Table3.cells[4,7]:='环网额定电压';
Table3.cells[4,8]:='环网基准电压';
Table3.cells[4,9]:='环网基准电流';
Table3.cells[4,10]:='牵引额定电压';
Table3.cells[4,11]:='牵引基准电压';
Table3.cells[4,12]:='牵引基准电流';
Table3.cells[4,13]:='配电额定电压';
Table3.cells[4,14]:='配电基准电压';
Table3.cells[4,15]:='配电基准电流';
Table3.cells[4,6]:='城网基准电流';
Table3.cells[1,1]:='2.22';
Table3.cells[1,2]:='5.15';
Table3.cells[1,3]:='0.0073';
Table3.cells[1,4]:='20';
Table3.cells[1,5]:='2000';
Table3.cells[1,6]:='7';
Table3.cells[1,7]:='0.051';
Table3.cells[1,8]:='25';
Table3.cells[1,9]:='100';
Table3.cells[1,10]:='2000';
Table3.cells[1,13]:='2.5';
Table3.cells[1,14]:='1.75';
Table3.cells[1,15]:='10.5';
Table3.cells[1,16]:='0.0007';
Table3.cells[1,17]:='8';
Table3.cells[3,1]:='0.186';
Table3.cells[3,2]:='0.013';
Table3.cells[3,3]:='0.1483';
Table3.cells[3,4]:='0.0451';
Table3.cells[3,5]:='0.118';
Table3.cells[3,6]:='0.118';
Table3.cells[3,7]:='0.1187';
Table3.cells[3,8]:='15';
Table3.cells[3,9]:='0.5';
Table3.cells[3,10]:='0';
Table3.cells[3,11]:='0';
Table3.cells[3,12]:='0.0044';
Table3.cells[3,13]:='0.011';
Table3.cells[3,14]:='0.014';
Table3.cells[3,15]:='6';
Table3.cells[3,16]:='0';
Table3.cells[3,17]:='0';
Table3.cells[5,1]:='20';
Table3.cells[5,2]:='0.0006';
Table3.cells[5,3]:='0.00148';
Table3.cells[5,4]:='110';
Table3.cells[5,5]:='115';Table3.cells[5,7]:='35';
Table3.cells[5,8]:='37';Table3.cells[5,10]:='1.18';
Table3.cells[5,11]:='1.24';Table3.cells[5,13]:='0.38';
Table3.cells[5,14]:='0.4';Table3.cells[5,16]:='0';
Table3.cells[5,17]:='0';
这是我的代码
看到这个如果我没理解错,就是一点击表格就执行这段代码,然后数据就还原了