Как подсчитать все символы в тексте

[StarEdik]

Привет всем!!!
В текстовом редакторе(Word, Notepad,WordPad) где курсор, там надо подсчитать количество символов. Но условия такие, что текст в редакторе не должно быть сохранено.

$sText='Вес текст в редакторе' ;???????????????????????
$text = StringStripWS($sText, 8)
$len = StringLen($text)
ConsoleWrite($text  & @CRLF)
ConsoleWrite("Символов в тексте " & $len   & @CRLF)

 

[sngr]

$str='Привет всем!!! '& @CRLF & _
'В текстовом редакторе(Word, Notepad,WordPad) где курсор, там надо подсчитать количество символов. Но условия такие, что текст в редакторе не должно быть сохранено.'

$str=StringToASCIIArray($str)
MsgBox(32,'',UBound($str))

 

[StarEdik]

sngr
Нет, это не то.Где курсор стоит там и нужно все символы из текста подсчитать.

 

[sngr]

send('^a')
send('^{ins}')
$str=clipget()