找回密码
 加入
搜索
查看: 8297|回复: 47

请问内嵌换行回车和其它任意符号的文本框AU3怎么实现?

 火.. [复制链接]
发表于 2009-11-13 15:18:00 | 显示全部楼层 |阅读模式
本帖最后由 oemxp 于 2009-11-14 20:11 编辑


要求:
1.不调用TXT文件和其它文件。
2.不释放不打包任何文件。
3.我想实现只要打开AU3源码,在某处把我的整段TXT文本(包含换行回车和其它任意符号)贴进去,然后编译成EXE就和上图一样。
有难度吧~???AU3能搞出来么?

有人问过这个问题,下面贴子附件有个很像记事本的文件,我就想做这样的效果:
http://www.autoitx.com/forum.php ... hlight=%CB%B5%C3%F7
但是那个贴子的回答太不实际了,我不可能每生成个文件都搞一大堆@crlf& ,那样会累死,且也实现不了,因为不能有特殊字符

不要让我去下载TXT转EXE的软件,我想要用AU3实现,因为如果能实现的话,这个AU3脚本我还要加入其它代码

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
发表于 2009-11-13 17:20:34 | 显示全部楼层
一个不懂搜索的XX
发表于 2009-11-13 17:23:14 | 显示全部楼层
论坛一大堆,随便给你个吧
http://www.autoitx.com/forum.php ... id=7644076#pid78109
 楼主| 发表于 2009-11-13 17:23:28 | 显示全部楼层
本帖最后由 oemxp 于 2009-11-13 17:32 编辑

请教楼上的要怎么搜,搜什么,可否给出个链接。我搜过关键字:文本框 没有和我问题相关内容
楼上老大,你随便给我的那个题不达意呀!~~~~
我不是要嵌入 浏览器,我是要生成一个全是文本的exe文件
 楼主| 发表于 2009-11-13 17:28:58 | 显示全部楼层
本帖最后由 oemxp 于 2009-11-13 17:49 编辑
论坛一大堆,随便给你个吧
kn007 发表于 2009-11-13 17:23

我怀疑老大根本就没看清我要问的问题,下面四种都不能实现我的问题,但是下面第二种有点用,但是我不想也没精力用第二种代码然后每行文本都加上@crlf&,我之前搜了好久搜不到才问问题的。
---------------------------------------------------------------------------------------
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$Form1 = GUICreate("Form1", 304, 173, 192, 124)
$Edit1 = GUICtrlCreateEdit("", 16, 16, 273, 137, $ES_WANTRETURN)
GUICtrlSetData(-1, "Edit1")
GUISetState(@SW_SHOW)

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
        EndSwitch
WEnd
---------------------------------------------------------------------------------------
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("示例", 467, 322, 193, 125)
$Edit1 = GUICtrlCreateLabel("", 0, 0, 465, 321)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$TXT="QQ"
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetData(-1, $TXT)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        If $nMsg= $GUI_EVENT_CLOSE Then        Exit
        $mouse=GUIGetCursorInfo()
        If $mouse[2] and $mouse[4]=$Edit1 Then
                GUICtrlSetCursor ($Edit1, 7)
        EndIf
        If not $mouse[2] and $mouse[4]=$Edit1 Then
                GUICtrlSetCursor ($Edit1, 5)
        EndIf
WEnd
---------------------------------------------------------------------------------------
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Global $Files="说明.txt"

$GUI = GUICreate("", 423, 254, 193, 115)
$Edit = GUICtrlCreateEdit("", 8, 8, 401, 201)
GUICtrlSetData(-1,readdate())
$OK = GUICtrlCreateButton("保存", 8, 216, 75, 25, 0)
GUISetState()
send("{down}")
While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        ExitLoop
                Case $OK
                        Setdate()

        EndSwitch
WEnd

Func Readdate()
        Local $txt,$temp
        $temp=FileOpen($Files,0)
        $txt=FileRead($temp)
        FileClose($temp)
        Return $txt
EndFunc   ;==>readdate

Func Setdate()
        Local $txt,$temp
        $temp=FileOpen($Files,2)
        $txt=GUICtrlRead($Edit)
        FileWrite($temp,$txt)
        FileClose($temp)
EndFunc   ;==>Setdate[/au3]
-----------------------------------------------------------------------------------------------
#include <GUIConstants.au3>
#include <IE.au3>
$oIE = _IECreateEmbedded ()
GUICreate("Test", 500, 400)
$GUIX = GUICtrlCreateObj($oIE, 0, 0, 500, 400)
GUISetState(@SW_SHOW)      
_IENavigate ($oIE, "http://www.91dwg.com/001.htm")
Sleep(6000)
_IENavigate ($oIE, "http://www.91dwg.com/002.htm")
Sleep(6000)
_IENavigate ($oIE, "http://www.91dwg.com/003.htm")
While 1
                Sleep(6000)
            ExitLoop
WEnd
GUIDelete()
Exit
发表于 2009-11-13 17:32:19 | 显示全部楼层
。。。。自己看看

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
发表于 2009-11-13 17:32:56 | 显示全部楼层
内嵌换行回车和其它任意符号的文本框

ke可编辑不?

内嵌图片,内嵌网页,内嵌。。。。。都行啊
 楼主| 发表于 2009-11-13 17:35:21 | 显示全部楼层
本帖最后由 oemxp 于 2009-11-13 17:37 编辑

不用编辑,您贴段代码出来嘛!~您下载下面这个附件,就知道我要问什么了:

http://www.autoitx.com/attachmen ... 3dtM1hUa0ZTOThiT1lz
发表于 2009-11-13 17:38:46 | 显示全部楼层
看不懂,我只要把我上面的附件中的gui模式去掉,把他改宽点不就行了
 楼主| 发表于 2009-11-13 17:39:58 | 显示全部楼层
老大还在线么?我一楼也许问得词不达意,您下载下面这个就知道我想问什么了:
http://www.autoitx.com/attachmen ... 3dtM1hUa0ZTOThiT1lz
我就是用AU3做一个这样的东西,但不调用其它TXT文件或HTML或其它文件
发表于 2009-11-13 17:40:36 | 显示全部楼层
如果要那个禁用指针,看帮助就知道了。。。。
然后disable控件就行了
发表于 2009-11-13 17:41:12 | 显示全部楼层
你是怎么知道他不调用其它TXT文件或HTML或其它文件
发表于 2009-11-13 17:43:27 | 显示全部楼层
那是Memo控件,au3好像没带。。。
发表于 2009-11-13 17:44:04 | 显示全部楼层
其实就是类似msgbox,只不过是白色底带边框。。。
 楼主| 发表于 2009-11-13 17:44:43 | 显示全部楼层
本帖最后由 oemxp 于 2009-11-13 17:49 编辑
你是怎么知道他不调用其它TXT文件或HTML或其它文件
kn007 发表于 2009-11-13 17:41

我不是要禁用指针,我用EQSSecure监控了他那个exe,没有释放任何文件,就是一个纯EXE实现的。
au3要硬来上面我贴的第三种代码来搞也能实现,但我不可能总是每个文本都去加一大堆@crlf&,会累死我。当然也许有不用强来简单方法,上面四种代码第三种就调用了TXT,可我就是不想调用,只想做成一个EXE
就是说我想每次复制一些文本贴到AU3脚本,然后编译一下就生成一个我想要的EXE
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-6-16 08:01 , Processed in 0.082328 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表