我把stringgrid控制元件里初設了一些常用引數，但有時候要修改這些引數數值，可以手動去修改引數，但滑鼠一點表格就又變回原來的了，請問我該怎帽淼ザ，很急，真的很急，在線等或加QQ514233301！可以有償！
uj5u.com熱心網友回復：
請原諒我自己把自己頂上去，人命關天呀！uj5u.com熱心網友回復：
一般情況下，修改了Cell值，是不會改變的。檢查你的代碼，是不是有事件重繪StringGrid的Cell值
uj5u.com熱心網友回復：
可以留個聯系方式嗎
uj5u.com熱心網友回復：
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';
這是我的代碼
uj5u.com熱心網友回復：
procedure TForm3.table3Click(Sender: TObject);看到這個如果我沒理解錯，就是一點擊表格就執行這段代碼，然后資料就還原了
uj5u.com熱心網友回復：
把你的修改和提交分開就可以了uj5u.com熱心網友回復：
解決方法很簡單，把Grid的Click事件刪掉，上面的代碼放在FormSHow或者FormCreate事件中uj5u.com熱心網友回復：
這些代碼作為初始化的話，放OnCreate事件里，或者在OnClick事件里加條件轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/47739.html
標籤：語言基礎/算法/系統設計