Hello all there,
The first I would like to apologize for my very bad english. I'm am writing an application and I feel Autoit language made me very interested and easy to apply. I having trouble sending string from my script to the WorldPad. I tried using the command ControlSetText to use, and it has successfully sent over the WorldPad text, but I do not understand why after sending it through WorldPad can not get the font color? I do not know how it can send the text color from tool send to WordPad. I hope everyone help me and i thank for this! Thank and good luck to all!
And this is the code currently my use
#Include <GuiRichEdit.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
Global $hGui, $hRichEdit, $iMsg, $hControl
$hGui = GUICreate("Document Send", 320, 180)
$hRichEdit = _GUICtrlRichEdit_Create($hGui, "", 10, 10, 300, 120, _
BitOR($ES_MULTILINE, $WS_VSCROLL, $ES_AUTOVSCROLL))
_GUICtrlRichEdit_SetCharColor($hRichEdit, "304050")
_GUICtrlRichEdit_AppendText($hRichEdit, "This is more text")
$SendBNT = GUICtrlCreateButton("Send Text", 190, 135, 120, 30)
GUICtrlSetOnEvent($SendBNT, "GuiSendText")
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
GUISetState()
While True
$iMsg = GUIGetMsg()
Select
Case $iMsg = $GUI_EVENT_CLOSE
_GUICtrlRichEdit_Destroy($hRichEdit) ; needed unless script crashes
Exit
EndSelect
WEnd
Func GuiSendText()
$ToText = _GUICtrlRichEdit_GetText($hRichEdit)
$wWHND = WinGetHandle("Document - WordPad", "")
ControlSetText($wWHND, "", "[CLASS:RICHEDIT50W; INSTANCE:1]", $ToText)
EndFunc
Func _GUICtrlRichEdit_AppendTextEx($hWnd, $sText)
Local $hParent = _WinAPI_GetParent($hWnd)
ControlSetText($hParent, '', $hWnd, $sText )
EndFunc
Func _Exit()
_GUICtrlRichEdit_Destroy($hRichEdit)
GUIDelete()
Exit
EndFunc
And Now Tool Send
I want to here
THANK FOR ALL HELPPPPP