Здравствуйте.
У меня вопрос :
Как убрать рамку в элементе edit?
У меня вопрос :
Как убрать рамку в элементе edit?
Код:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Constants.au3>
#include <Encoding.au3>
#Include <GuiEdit.au3>
#include <StaticConstants.au3>
HotKeySet("{ESC}", "_Exit")
$color = 0x00ff00
$Form1 = GUICreate("Form1", 500, 315, 304, 254, $WS_POPUP, $WS_EX_TOOLWINDOW + $WS_EX_LAYERED + $WS_EX_TRANSPARENT)
$Edit1 = GUICtrlCreateEdit("", 24, 24, 425, 209,BitOR ($SS_BLACKFRAME, $ES_AUTOVSCROLL, $ES_READONLY));, $WS_VSCROLL))
GUICtrlSetData(-1, "")
GUICtrlSetColor(-1, 0x008000)
GUICtrlSetBkColor(-1, $color)
GUISetBkColor($color)
_WinAPI_SetLayeredWindowAttributes($Form1, $color)
GUISetState()
GUISetState(@SW_SHOW)
$i=0
While 1
$i+=1
GUICtrlSetData($Edit1,GUICtrlRead($Edit1)&$i&@CRLF)
_GUICtrlEdit_LineScroll($Edit1, 0, _GUICtrlEdit_GetLineCount($Edit1))
sleep(100)
WEnd
Func _Exit()
Exit
EndFunc ;==>_Exit