标题:[求助]ini读取Option控件的疑问(已解决)
取消只看楼主
lrd1986
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2007-9-11
结帖率:100%
 问题点数:0 回复次数:5 
[求助]ini读取Option控件的疑问(已解决)
请问用ini保存软件的设置的时候,对于Option控件的值读取为什么会读不到?

例如在一个Frame里有三个Option ,选择第一个,用INI文件保存后,再打开软件结果三个都没有被选中

但是Check控件就可以正常读取

请问这是为什么?先谢谢啦

PS:multiple1902版主如果是来灌水就免了

[此贴子已经被作者于2007-10-2 22:49:37编辑过]

搜索更多相关主题的帖子: Option控件 ini 疑问 软件 
2007-10-01 20:04
lrd1986
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2007-9-11
得分:0 
回复:(purana)你没有写功能实现,当然没有选中.
不是啊,我在保存的时候已经把三个Option的值全部写进ini文件中了哦

为什么会读取不到的呢?

而且Check的值可以正常读取哦

走自己的路,让人说去
2007-10-01 20:11
lrd1986
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2007-9-11
得分:0 
回复:(刨子头)把代码贴出来,瞅瞅先。
'其中FILE_NAME = App.Path & "\myset.ini"

Private Sub cmdSaveSetup_Click()
........
........

'这里就是保存Option的value值到一个ini文件中
Call WritePrivateProfileString("form", "code(1)", Option1.Value, FILE_NAME)
Call WritePrivateProfileString("form", "code(2)", Option2.Value, FILE_NAME)
Call WritePrivateProfileString("form", "code(3)", Option3.Value, FILE_NAME)
.........
.........
End Sub
.......
.......
Private Sub Form_Load() '初始化时候读取
.......
.......
Option1.Value = GetPrivateProfileInt("form", "code(1)", Option1.Value, FILE_NAME)
Option2.Value = GetPrivateProfileInt("form", "code(2)", Option2.Value, FILE_NAME)
Option3.Value = GetPrivateProfileInt("form", "code(3)", Option3.Value, FILE_NAME)
.......
.......
End Sub


checkbox可以正常读取,只有Option不行

[此贴子已经被作者于2007-10-1 23:52:19编辑过]


走自己的路,让人说去
2007-10-01 23:24
lrd1986
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2007-9-11
得分:0 
回复:(雨中飞燕)你这种写法让我无语,建议打一下基...
我把其中关键的贴出来不对吗?注释也有啦?难道要每句都注释?

....表示省略的部分

那请问贴代码的正确方法是什么?愿闻其详

走自己的路,让人说去
2007-10-02 15:49
lrd1986
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2007-9-11
得分:0 
回复:(雨中飞燕)Option1.Value = GetPrivateProfil...
哦,原来如此。谢谢啦

PS:我的学习方法从来都是不从基础学起的,都是遇到问题就解决它。我觉得这样并不比慢慢从基础学起差。不过仁者见仁,我不勉强你同意我的观点。只是希望你们不强迫我就OK了

走自己的路,让人说去
2007-10-02 16:03
lrd1986
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2007-9-11
得分:0 
回复:(雨中飞燕)当然,VB在这方面还不是太明显,如...
是吗?我可不觉。。。。

那看来是我火星了

我总觉得如果被书上的所谓基础束缚住,就很难用自己的想法去做了。

[此贴子已经被作者于2007-10-2 16:29:17编辑过]


走自己的路,让人说去
2007-10-02 16:25



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-174541-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.389086 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved