Corel FORUM

[madrazel]

REM Utworzony w Corel PHOTO-PAINT Wersja 14.0.0.701
REM Utworzony Wednesday, November, 04, 2009 przez Administrator

WITHOBJECT "CorelPHOTOPAINT.Automation.14"
open "c:\filelist.txt" for input as #1

while not EOF(1)
line input #1, filename$
.FileOpen filename$, -698500, 635000, 825500, -507946, 0, 1, 1
.FileSave left(filename$, len(filename$)-4) & ".png", 802, 0
.FileClose
wend

close #1
END WITHOBJECT

-- co czegoś takiego doszedłem (znalazłem taki skrypt na innym forum), działa tylko w photopaincie ale jest problem polegający na tym że ani rejestrator ani potem przy odtwarzaniu program nie reaguje na parametry grafiki wynikowej tzn. z jakim dpi ma być to renderowane i wychodzą takie małe pliczki prawie jak te rastrowe ikonki zapisane w pliku CDR

[wawel]

A co jesli plik cdr bedzie mial kilka stron?
polecam macro wx_FileConverter.gms do Draw ktore zrastruje pliki cdr, mozna w nim ustawic rozdzielczosc, dolaczyc profil, kompresje, wybrac format, tlo i ustawic tak aby kolejne strony w dokumencie byly tez zrastrowane.
pozdr.
link
http://recentfiles.netfirms.com/