- Сообщения
- 85
- Реакции
- 2
Есть проблема, может кто сталкивался и знает вопрос...
зависает illustrator и вылетает после запуска скрипта с параметрами..
суть:
есть некий код написаный на яве, но запускается он из под vb.net
так вот, в пределах одного файла все работает и нареканий нет, но стоит запустить в другом файле или если файлу реверт, то вылетает с ошибкой и программа и illustrator CS6
текст ошибки примерно такой:
Почему повторный запуск кода вызывает проблему?
зависает illustrator и вылетает после запуска скрипта с параметрами..
суть:
есть некий код написаный на яве, но запускается он из под vb.net
так вот, в пределах одного файла все работает и нареканий нет, но стоит запустить в другом файле или если файлу реверт, то вылетает с ошибкой и программа и illustrator CS6
текст ошибки примерно такой:
Почему повторный запуск кода вызывает проблему?
Код:
Dim argList(5) As Object
argList(0) = x1
argList(1) = y1
argList(2) = x2
argList(3) = y2
argList(4) = mycolor
AiApp.DoJavaScript( _
"var scriptArgs=app.arguments;" & vbNewLine & _
"var x1 = arguments[0]; " & vbNewLine & _
"var y1 = arguments[1]; " & vbNewLine & _
"var x2= arguments[2]; " & vbNewLine & _
"var y2= arguments[3];" & vbNewLine & _
"var mColor = arguments[4];" & vbNewLine & _
"var docRef = activeDocument;" & vbNewLine & _
"var piRef = docRef.pathItems;" & vbNewLine & _
"//__________________________" & vbNewLine & _
"var TLU = piRef.add();" & vbNewLine & _
"TLU.setEntirePath( new Array( new Array( x1,y1),new Array( x1+1,y1),new Array(x1+1,y1-1 ),new Array(x1+1,y1-1 ),new Array(x1+Ts,y1-1 ),new Array( x1,y1-1) ) ) ;" & vbNewLine & _
"TLU.position = new Array((x1-1-1), (y1+1+1) );" & vbNewLine & _
"TLU.stroked = false;" & vbNewLine & _
"TLU.filled = true;" & vbNewLine & _
"TLU.fillColor = mColor;" & vbNewLine & _
"TLU.name=""LT"";" & vbNewLine & _
"TLU.fillOverprint= true; " & vbNewLine & _
"TLU.closed=true;" & vbNewLine & _
"//__________________________", arg, 1)