tcpuuu 发表于 2012-1-24 21:25:26

[已解决]求助 數據 存檔 讀檔的問題 (能自定路徑 檔名).........

本帖最后由 tcpuuu 于 2012-2-8 22:39 编辑


按1下存檔 寫入.INI檔
可以跳出 選擇 存放路徑 自訂檔名
讀檔 可以選擇 讀取那個檔
這該如何做?GUICreate('EDIE',400,100)      
$A1 = GUICtrlCreateInput("12345",5,5,160,23)
$A2 = GUICtrlCreateInput("123",5,30,50,23)
For $i = $A1 to $A2
GUICtrlSetFont($i,12)
Next

Global $1But= GUICtrlCreateButton("存 檔",200,4,38,26)
Global $2But= GUICtrlCreateButton("讀 檔",200,30,38,26)

GUISetState()
While 1

      $msg = GUIGetMsg()
      Switch $msg
                Case -3
                        Exit
Case $1But
IniWrite("C:\FITX.ini","AAA1","$A1",GUICtrlRead($A1))
IniWrite("C:\FITX.ini","AAA2","$A2",GUICtrlRead($A2))

Case $2But
GUICtrlSetData($A1,IniRead("C:\FITX.ini","AAA1","$A1",""))
GUICtrlSetData($A1,IniRead("C:\FITX.ini","AAA2","$A2",""))

EndSwitch
WEnd

user3000 发表于 2012-1-24 22:46:10

又是你啊, 兄弟??
FileOpenDialog, FileSaveDialog, FileSelectFolder
请你用心研究下? 总有个会你满意吧?

tcpuuu 发表于 2012-1-24 23:52:34

又是你啊, 兄弟??
FileOpenDialog, FileSaveDialog, FileSelectFolder
请你用心研究下? 总有个会你满意吧 ...
user3000 发表于 2012-1-24 22:46 http://www.autoitx.com/images/common/back.gif


   拜託你幫我 編1個好嗎? 簡單例子就好

lpxx 发表于 2012-1-25 00:06:27

又是你啊, 兄弟??
FileOpenDialog, FileSaveDialog, FileSelectFolder
请你用心研究下? 总有个会你满意吧 ...
user3000 发表于 2012-1-24 22:46 http://www.autoitx.com/images/common/back.gif

是啊，这样才是学习。

tcpuuu 发表于 2012-1-25 02:49:34

我試了 好久 都不行
拜託各位 高手 幫幫忙

xxsshh 发表于 2012-1-25 12:02:23

学习下！！

tcpuuu 发表于 2012-1-26 23:17:54

;標題;            ;起使目錄;             ;文件類型;                               ;選項    ;預設檔名 ; 窗口句柄窗口句柄       [可选参数] 指定这个对话框的父窗口的窗口句柄.
FileSaveDialog("儲存INI檔為",@MyDocumentsDir & "\FITX" & "\","ini檔案 (*.ini)",2,$tm & ".ini",0x00420294)
-----------------------------------------------------------------------------
显示一个文件打开对话框.FileSaveDialog

這個对话框打開 都 顯示在 螢幕的最左上角

我想讓它顯示在 窗口的最左上角 該如何設置?    父窗口的窗口句柄 是什麼?

半芯竹 发表于 2012-1-27 00:26:27

本帖最后由 半芯竹 于 2012-1-27 21:16 编辑

$mygui=GUICreate('EDIE',400,100,0,0)      
$A1 = GUICtrlCreateInput("12345",5,5,160,23)
$A2 = GUICtrlCreateInput("123",5,30,50,23)
For $i = $A1 to $A2
GUICtrlSetFont($i,12)
Next

Global $1But= GUICtrlCreateButton("存 檔",200,4,38,26)
Global $2But= GUICtrlCreateButton("讀 檔",200,30,38,26)

GUISetState()
While 1

      $msg = GUIGetMsg()
      Switch $msg
                Case -3
                        Exit
                                        Case $1But
$data1=GUICtrlRead ($A1)
$var1 = FileSaveDialog( "输入一个文件名", @DesktopDir, "配置文件 (*.ini)", 2+16,'config.ini',$mygui)
If Not @error Then
IniWrite ( $var1, "", "",$data1)
EndIf
Case $2But
$var2 = FileOpenDialog('请选择一个INI文件' , @DesktopDir, "配置文件 (*.ini)", 1,'config.ini',$mygui )
If not @error Then
$data2=IniRead($var2,'','','')
GUICtrlSetData($a2,$data2)
EndIf
EndSwitch
WEnd

tcpuuu 发表于 2012-1-27 01:51:03

FileSaveDialog( "输入一个文件名", @DesktopDir, "配置文件 (*.ini)", 2+16,'file.ini')
FileOpenDialog('请选择一个INI文件' , @DesktopDir, "配置文件 (*.ini)", 1 )
---------------------------------------------------------------------------------------------
以上這兩個 開啟 選擇檔案 對話框都開在 螢幕左上角
如果要開在窗口開在父窗口的左上角 是加什麼參數?

showshow 发表于 2012-1-27 17:42:34

回复 9# tcpuuu

FileOpenDialog ( "标题", "起始目录", "文件类型" [, 选项 [, "默认文件名" [, 窗口句柄]]] )

最后一个参数就是GUICreate的句柄！

kvisof 发表于 2012-1-28 19:41:53

露个面，学习，学习！

xms77 发表于 2012-1-30 12:20:52

本帖最后由 xms77 于 2012-1-30 12:22 编辑

回复 3# tcpuuu
不会可以学，简单的功能看帮助就行了，况且帮助里面还有示例代码，只有自己尝试的才是学到的，不要做伸手党！

kk_lee69 发表于 2012-1-30 23:15:24

我是比較建議......樓主 說 弄很久都弄不好.....那沒關係.....你總有寫一半的程式吧.....

把程式 PO 出來.....要回答的人 也才比較清楚.....您努力的過程....還有到底是哪個點的問題.....這樣你學到的東西 會更多....
页: [1]
查看完整版本: [已解决]求助 數據 存檔 讀檔的問題 (能自定路徑 檔名).........