Цитата FlatX007:
|
На выходе нужно получить такой текст в сообщении : " Текст @ScriptDir Отмена " »
|
Или я чего то не понял, или у тебя очень уж мудренный код...
Код:
Dim $MsgBox[1]
$MsgBox[0] = "< Текст > <#> <#>"
Dim $vTextReplace[3]
$vTextReplace[1] = "@ScriptDir"
$vTextReplace[2] = "Отмена"
$text = StringRegExpReplace($MsgBox[0], '< (.*?) >.*', '\1')
MsgBox(32, "", $text&' '&$vTextReplace[1]&' '&$vTextReplace[2])
