我的一个程序需要写多个变量到配置文件
iniFile.WriteString('StaticText', 'TextString', mmosText_Text.Text);
iniFile.WriteInteger('StaticText', 'PositionX', trksText_PositionX.Position);
iniFile.WriteInteger('StaticText', 'PositionY', trksText_PositionY.Position);
iniFile.WriteInteger('StaticText', 'Alpha', trksText_Alpha.Position);
iniFile.WriteBool('StaticText', 'ReplaceFileName', chksText_FileName.Checked);
iniFile.WriteBool('StaticText', 'AllowShow', chksText_Show.Checked);
mmosText_Text为Memo, trksText_PositionX、trksText_PositionY、trksText_Alpha为TrackBar,chksText_FileName、chksText_Show为Checkbox。写入成功! 然而当我读出的时候:
mmosText_Text.Text := iniFile.ReadString('StaticText', 'TextString', '%FileName%');
trksText_PositionX.Position := iniFile.ReadInteger('StaticText', 'PositionX', 0);
trksText_PositionY.Position := iniFile.ReadInteger('StaticText', 'PositionY', 0);
trksText_Alpha.Position := iniFile.ReadInteger('StaticText', 'Alpha', 50);
chksText_FileName.Checked := iniFile.ReadBool('StaticText', 'ReplaceFileName', True);
chksText_Show.Checked := iniFile.ReadBool('StaticText', 'AllowShow', True);
却出现错误:
Access violation at address 0047CC7E in module 'VMRPlayWin.exe'. Read of address 00000000
到底是怎么回事请呀?请大虾们帮我解决解决!
iniFile.WriteString('StaticText', 'TextString', mmosText_Text.Text);
iniFile.WriteInteger('StaticText', 'PositionX', trksText_PositionX.Position);
iniFile.WriteInteger('StaticText', 'PositionY', trksText_PositionY.Position);
iniFile.WriteInteger('StaticText', 'Alpha', trksText_Alpha.Position);
iniFile.WriteBool('StaticText', 'ReplaceFileName', chksText_FileName.Checked);
iniFile.WriteBool('StaticText', 'AllowShow', chksText_Show.Checked);
mmosText_Text为Memo, trksText_PositionX、trksText_PositionY、trksText_Alpha为TrackBar,chksText_FileName、chksText_Show为Checkbox。写入成功! 然而当我读出的时候:
mmosText_Text.Text := iniFile.ReadString('StaticText', 'TextString', '%FileName%');
trksText_PositionX.Position := iniFile.ReadInteger('StaticText', 'PositionX', 0);
trksText_PositionY.Position := iniFile.ReadInteger('StaticText', 'PositionY', 0);
trksText_Alpha.Position := iniFile.ReadInteger('StaticText', 'Alpha', 50);
chksText_FileName.Checked := iniFile.ReadBool('StaticText', 'ReplaceFileName', True);
chksText_Show.Checked := iniFile.ReadBool('StaticText', 'AllowShow', True);
却出现错误:
Access violation at address 0047CC7E in module 'VMRPlayWin.exe'. Read of address 00000000
到底是怎么回事请呀?请大虾们帮我解决解决!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货