Показать сообщение отдельно
Старый 09.06.2010, 13:57
point111 вне форума Посмотреть профиль Отправить личное сообщение для point111 Найти все сообщения от point111
  № 5  
Ответить с цитированием
point111
 
Аватар для point111

Регистрация: Feb 2009
Сообщений: 56
Разобрался.
Избавиться от диалогового окна в настройках флеша -
редактирование>установки>импортер ai файлов
Всё оказывается просто, там же куча настроек каким образом этот аи будет вставлен.


скриптец для переброски объектов из корела во флеш готов, вдруг кому пригодиться.


код VBA для Corel:
Код:
Sub export_AI()
    Dim OrigSelection As ShapeRange
    Set OrigSelection = ActiveSelectionRange
    Dim expflt As ExportFilter
    Dim expopt As StructExportOptions
    Set expopt = New StructExportOptions
    expopt.UseColorProfile = False
    Set expflt = ActiveDocument.ExportEx("C:\PR\JSFL\script\1.ai", cdrAI, cdrSelection, expopt)
    With expflt
        .Version = 4 ' FilterAILib.aiVersion8
        .TextAsCurves = False
        .Platform = 0 ' FilterAILib.aiPC
        .ConvertSpotColors = False
        .UseColorProfile = False
        .SimulateOutlines = False
        .SimulateFills = False
        .IncludePlacedImages = False
        .IncludePreview = True
        .Finish
    End With

    Dim RetVal
     RetVal = Shell("c:\PR\JSFL\script\startjsfl.bat", 6)
   

End Sub
код файла jsfl, он должен называться ImportAI.jsfl
Код:
var dom = fl.getDocumentDOM();  
var URI ="file:///C|/PR/JSFL/script/1.ai";
dom.importFile(URI)
Ещё понадобился батник (startjsfl.bat), т.к. корел отказался напрямую запускать jsfl:

Код:
START c:\PR\JSFL\script\ImportAI.jsfl
осталась мелочь, если надо, чтобы еденици измерения в кореле и во флеше совпадали, меняем масштаб в кореле: два раза кликаем на линейке и ставим масштаб 1 мм = 2,84 мм.

Ну, пути сами себе поправите, как кому удобно.

ladon спасибо, это мне тоже понадобиться