[решено] Edit 4

FlatX007 · Отправлено: **07:14, 10-06-2010** | #2

Цитата semiono:

Как мне выделить текст в поле Edit 4 ? »

- Симулировать комбинацию клавиш Ctrl + A ??

madmasles · Конфигурация компьютера

semiono,
Выделить можно так:

Код:

#include <GuiEdit.au3>

$handle = ControlGetHandle($sTitle, "", "Edit4")
_GUICtrlEdit_SetSel($handle, 0, 32)

Но, ИМХО, лучше сделать так:

Код:

$sSerial = ControlGetText($sTitle, '', '[CLASS:Edit; INSTANCE:4]')
ClipPut($sSerial)

А потом активируйте второе окно и кликайте по кнопке "Paste".

ArPi · Отправлено: **12:33, 10-06-2010** | #4

подскажите, пожалуйста, а как сделать чтобы по нажаитю некой ctrlbutton в GUI AutoIT строка хранящая в данный момент в буфере обмена вида "^A0^B№ 4452/3^C20100430^Dуч. аб.^H6645000420829^X" была преобразована в соотвествующими правилами

1)в части строки "^B№ 4452/3" номер после "/" необходимо увеличить на единицу.
2) часть строки после "^H", а точнее 13 символов, необходимо удалить.

таким образом должна получиться строка вида "^A0^B№ 4452/4^C20100430^Dуч. аб.^H^X"
а ее нужно занести обратно в буфер обмена.

madmasles · Конфигурация компьютера

ArPi,
Попробуйте так. Наверное, с помощью регулярных выражений это можно сделать изящнее.

Код:

;$sString = ClipGet() ;вернуть строку из буфера
$sString = '"^A0^B№ 4452/3^C20100430^Dуч. аб.^H6645000420829^X"'
$sNewString = StringLeft(StringReplace($sString, StringMid($sString, StringInStr($sString, '/') + 1, 1), _
        StringMid($sString, StringInStr($sString, '/') + 1, 1) + 1, 1), _
        StringInStr($sString, '.', 0, -1) + 2) & '^X"'
;ClipPut($sNewString) ;записать новую строку в буфер
MsgBox(0, "", $sNewString)

semiono · Отправлено: **19:59, 10-06-2010** | #6

madmasles, Вы мне реально помогли, работает!