pchome2000 发表于 2009-4-14 09:53:02

如何实现$input1拖入其它后缀名文件后,$input2的后缀名跟着变成.exe后缀名

$Data = GUICtrlRead($Input3)
        $Data1 =GUICtrlRead($Input4)
        If $Data <> "" Then
                       _PathSplit($Data, $szDrive, $szDir, $szFName, $szExt)      ;读取 $input3文件名
                       $Fname1 = $szFName
                       _PathSplit($Data1, $szDrive, $szDir, $szFName, $szExt)   ;读取 $input4文件名
                       $Fname2 = $szFName
                          _PathSplit($sSname, $szDrive, $szDir, $szFName, $szExt)   ;读取 $input4文件名
                       $sSname = $szFName
                       $Ext = StringRegExp(GUICtrlRead($Input3),'.+\.(.+[^\.])', 1, 1)      ;读取后缀名
                        If $sSavFile = "" Then
                If $Fname1 <> $Fname2 Then GUICtrlSetData($Input4, StringReplace(GUICtrlRead($Input3),$Ext,"exe"))
                        ElseIf $sSname = $Fname2 Then
                                GUICtrlSetData($Input4, $sSavFile & ".exe")
                        EndIf
        EndIf

这段代码如何实现$input1拖入其它后缀名文件后,$input2的后缀名跟着变成.exe后缀名,如果再按button按钮选择保存到其它路径后,再将文件拖入$input1后,$input2路径跟着$input1的路径变化。

大绯狼 发表于 2009-4-14 18:07:31

字符串控制。。。。。

pchome2000 发表于 2009-4-14 19:49:53

如何控制,可否给出例子?????????????

lynfr8 发表于 2009-5-23 19:04:49

不难实现,只是你代码给的不全
难道你想让大家为了帮你解决问题自己画个gui再搞几个input输入框?
想解决问题就把问题说清楚
把需要的东西准备齐发出来
本想修改下的
看你那一段两头不到岸的代码
罢了

sensel 发表于 2009-5-23 20:35:12

前面用了_PathSplit,后面就不需要用别的方法获取扩展名。
直接将$Input3的值(3还是1?内容是3标题是1?)用_PathSplit分离,再合并 驱动器、路径、文件名和".exe",最后放置新值到$Input4。
页: [1]
查看完整版本: 如何实现$input1拖入其它后缀名文件后,$input2的后缀名跟着变成.exe后缀名