sproxy
Full Member | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
gal7
Цитата:| Многие наверное пользуются SciTE, может кто знает почему в его окно можно вставить с помощью ControlSetText() только один (первый в вставляемом тексте) символ? При этом получать из окна можно весь текст. Проблема в SciTE? |
ты идешь по моим следам, вставить можно так:
Код: $sSciTE_Data = 'more text more text more text more text more text more text '
$sSciTE_Data = StringToBinary($sSciTE_Data, 1)
$sSciTE_Data = BinaryToString($sSciTE_Data, 2)
MsgBox(64, 'SciTE Get Text Demo', $sSciTE_Data)
ControlSetText("[CLASS:SciTEWindow]", "", "Scintilla1", $sSciTE_Data) |
а "взять", вот так.
FullHD
Код: #region: - Include
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#endregion
#region: - Option
Opt('GUIOnEventMode', 1)
Opt('MustDeclareVars', 1)
Opt('TrayIconDebug', 1)
Opt('TrayIconHide', 0)
#endregion
#region: - Global
Global $sIniFile, $sCfgUseDualCore, $hWinMain, $hUseDualCore
;~ путь к INI файлу:
$sIniFile = @ScriptDir & '\gfx_opengl.ini'
#endregion
#region: GUI
$hWinMain = GUICreate('Test UseDualCore', 400, 400, -1, -1, $WS_CAPTION+$WS_SYSMENU)
GUISetOnEvent($GUI_EVENT_CLOSE, '_Exit_pro')
$hUseDualCore = GUICtrlCreateCheckbox('Установить: UseDualCore = False', 20, 20, 150)
GUICtrlSetOnEvent(-1, '_UseDualCore_Checkbox')
#endregion
#region: - После создания всех GUI
$sCfgUseDualCore = IniRead($sIniFile, 'Core', 'UseDualCore', 'False')
If $sCfgUseDualCore == 'True' Then
GUICtrlSetState($hUseDualCore, $GUI_CHECKED)
GUICtrlSetData($hUseDualCore, 'Установить: UseDualCore = False')
Else
GUICtrlSetState($hUseDualCore, $GUI_UNCHECKED)
GUICtrlSetData($hUseDualCore, 'Установить: UseDualCore = True')
EndIf
GUISetState(@SW_SHOW, $hWinMain)
#endregion
#region: - Sleep, Exit
While 1
Sleep(10)
WEnd
Func _Exit_pro()
Exit
EndFunc
#endregion
Func _UseDualCore_Checkbox()
If GUICtrlRead($hUseDualCore) = $GUI_CHECKED Then
IniWrite($sIniFile, 'Core', 'UseDualCore', 'True')
GUICtrlSetData($hUseDualCore, 'Установить: UseDualCore = False')
Else
IniWrite($sIniFile, 'Core', 'UseDualCore', 'False')
GUICtrlSetData($hUseDualCore, 'Установить: UseDualCore = True')
EndIf
EndFunc |
............хмм... |
Всего записей: 556 | Зарегистр. 21-11-2007 | Отправлено: 15:00 24-02-2009 | Исправлено: sproxy, 15:26 24-02-2009 |
|
.!!!
