那位高手能否写个备忘录小软呢？

lynfr8

很实用的例子，可直接编辑ini文件设置备忘录，虽简单但也够用，重复提醒也有了~
要刺激点就在消 ...
afan 发表于 2010-7-12 01:38

加个卡巴斯基查到病毒那个杀猪声应该蛮刺激的
以前读书的时候整个宿舍因为U盘都中了熊猫烧香
一起卡巴斯基同时开杀
整个宿舍杀猪声此起彼伏，那个凄惨啊~~~

afan

加个卡巴斯基查到病毒那个杀猪声应该蛮刺激的
以前读书的时候整个宿舍因为U盘都中了熊猫烧香
一起卡 ...
lynfr8 发表于 2010-7-12 01:51

哈哈，很有感觉，传个wav?mid?wma还是mp3上来吧~

lynfr8

哈哈，很有感觉，传个wav?mid?wma还是mp3上来吧~
afan 发表于 2010-7-12 01:55

现在只用微点，卡巴早就在硬盘消失了
在网上找到了，再听，当年悲壮感回来了！

sanhen

很好。很强大。很经典的WAV。。。

lynfr8

建议afan考虑写个_IniRenameKey修改字段里面的关键字
这样你的UDF就更丰富全面了
有时候还真的用的上
如果不借助你写的UDF要写上面那个备忘录还真要死不少脑细胞

afan

正在听雅尼的曲子，突然被这刺耳的具有强烈反差感的“音乐”惊醒，今晚通宵不成问题了…

建议afan考虑写个_IniRenameKey修改字段里面的关键字
这样你的UDF就更丰富全面了
有时候还真的用的上
如 ...
lynfr8 发表于 2010-7-12 02:07

你的意思是仅修改关键字，而值并不改变？

lynfr8

正在听雅尼的曲子，突然被这刺耳的具有强烈反差感的“音乐”惊醒，今晚通宵不成问题了…


你的意思是仅 ...
afan 发表于 2010-7-12 02:12

正是此意
我也今晚无眠：伪球迷看世界杯！
明早还要7点起床
不写代码了
享受一下足球的魅力和南非人民最后一晚助威工具“呜呜祖啦”的噪声咯

jhun

额，咱写了一个，看合你意不
http://www.autoitx.com/forum.php ... id=16858&extra=

newuser

回复 14# lynfr8
能接着给讲解一下吗?没有理解老大思路而逐条读代码真的太难了,我水平又太有限,谢谢了!

#include <Array.au3>
#include '_Ini.au3'
While 1
Sleep(100)
$date = _IniReadSectionNames('setting.ini', 0);读取标准ini文件中所有的‘字段名’，后面的0是什么意思？
For $i = 1 To $date[0]
  If $date[$i] = @YEAR & "-" & @MON & "-" & @MDAY Then;如果读取的ini文件中的‘字段名’符合‘年-月-日’形式的
   $Remind = _IniReadSection('setting.ini', $date[$i], 0);读取合适字段下的所有关键字或值
   If $Remind <> 0 Then
    For $n = 1 To $Remind[0][0]
     If @HOUR & ":" & @MIN = $Remind[$n][0] Then;如果有与已读取字段下的’指定关键字相匹配的‘进行指定操作
      $Switch = MsgBox(5, $Remind[$n][0], $Remind[$n][1])
          ;显示指定时间指定想提示的，但把它赋值给$Switch又为什么，任务不是已经完成？下面无法读懂？
      If $Switch = 4 Then
       $oldRemind = _FileRead('setting.ini', 0)
       $File = FileOpen('setting.ini', 2)
       FileWrite($File, StringReplace($oldRemind, $Remind[$n][0] & '=' & $Remind[$n][1], @HOUR & ":" & @MIN + 1 & '=' & $Remind[$n][1]))
       FileClose($File)
      Else
       _IniDelete('setting.ini', $date[$i], $Remind[$n][0])
       ExitLoop (2)
      EndIf
     EndIf
    Next
   EndIf
  EndIf
Next
WEnd

yarsye

回复 23# jhun
很 好 下载了

xz00311

论坛的源码区有你想要的

netegg

从如何开始我都不会啊？我真的不知如何设计。
小军218 发表于 2010-7-11 11:10

不知如何设计？这话说的，那就别编了，直接找软件去吧
就算要代码也没有这么要的

lynfr8

回复  lynfr8
能接着给讲解一下吗?没有理解老大思路而逐条读代码真的太难了,我水平又太有限,谢谢了!
newuser 发表于 2010-7-12 17:02

#include <Array.au3>
#include '_Ini.au3'
While 1
Sleep(100)
$date = _IniReadSectionNames('setting.ini', 0);读取ini所有‘字段名’
;标志=1时返回的数组0号元素为数组的元素数量(默认)；标志=0时关闭0元素返回数量;不过，标志=0时并未关闭0元素返回数量，依然可以返回。
For $i = 1 To $date[0]
  If $date[$i] = @YEAR & "-" & @MON & "-" & @MDAY Then;如果读取的ini文件中的‘字段名’符合‘年-月-日’形式的
   $Remind = _IniReadSection('setting.ini', $date[$i], 0);读取合适字段下的所有关键字或值
   If $Remind <> 0 Then
    For $n = 1 To $Remind[0][0]
     If @HOUR & ":" & @MIN = $Remind[$n][0] Then;如果当前时分与已读取字段下的关键字相匹配
      $Switch = MsgBox(5, $Remind[$n][0], $Remind[$n][1])
          ;显示指定时间指定想提示的，赋值给$Switch返回按下按钮的 ID
      If $Switch = 4 Then;返回MsgBox按下按钮的 ID 为 RETRY(重试)  4 
       $oldRemind = _FileRead('setting.ini', 0);读取ini,赋值到$oldRemind
       $File = FileOpen('setting.ini', 2);2 = 写入模式(先删除之前的内容)
       FileWrite($File, StringReplace($oldRemind, $Remind[$n][0] & '=' & $Remind[$n][1], @HOUR & ":" & @MIN + 1 & '=' & $Remind[$n][1]));替换原来关键字“时分”，其中分钟+1
       FileClose($File);关闭ini
      Else;返回MsgBox按下按钮的 ID 为 CANCEL(取消)  2 
       _IniDelete('setting.ini', $date[$i], $Remind[$n][0]);删除指定字段的指定的关键字和数值
       ExitLoop (2);默认值为 1(表示当前 For $n = 1 To $Remind[0][0] 循环).  2为For $i = 1 To $date[0]
      EndIf
     EndIf
    Next
   EndIf
  EndIf
Next
WEnd

afan

• $date = _IniReadSectionNames('setting.ini', 0);读取ini所有‘字段名’
• ;标志=1时返回的数组0号元素为数组的元素数量(默认)；标志=0时关闭0元素返回数量;不过，标志=0时并未关闭0元素返回数量，依然可以返回。
  lynfr8 发表于 2010-7-12 22:04

貌似前辈记错了参数位置，第二个位置是打开模式，第三个位置才是“标志=1时返回的数组0号元素为数组的元素数量(默认)；标志=0时关闭0元素返回数量” 哈~

lynfr8

貌似前辈记错了参数位置，第二个位置是打开模式，第三个位置才是“标志=1时返回的数组0号元素为数组的元素 ...
afan 发表于 2010-7-12 22:10

Func _IniReadSectionNames($iFile, $mode = 0, $flag = 1)

呵呵，确实是记错位置了，楼主也要认真看看afan的UDF里面的详细参数
这样才能更好的运用
这个UDF在做“类数据库”的时候还是非常方便的