| |
Corel FORUM Forum użytkowników programów firmy Corel. Grafika wektorowa, rastrowa i obróbka zdjęć cyfrowych |
 |
CorelDRAW - grafika wektorowa - Eksportowanie do jpg
Foodall - 10 Styczeń 2011, 22:43 Temat postu: Eksportowanie do jpg Witam,
Przyznaję, że nie przejrzałem wszystkich tematów i jest możliwe, że kiedyś ten problem był poruszany.
Jak wyeksportować z corela do jpg tylko to co znajduje się na stronie? Tak żeby nie eksportowało się to co wystaje poza krawędzie.
Z góry dziękuje za pomoc,
Pozdrawiam
wawel - 10 Styczeń 2011, 23:07
Rzeczywiscie problem byl kilka razy poruszany.
Jest kilka rozwiazan np. umieszczenie wszystkiego (elementow strony) w kadrze wielkosci str.
Najlepiej jednak wyrobic sobie nawyk aby przycinac elementy juz na etapie projektu. Prowadnicami wyznaczyc sobie obszar strony i do niego dopasowywac elementy (wektory, zdjecia).
pozdr.
Foodall - 10 Styczeń 2011, 23:49
Dzięki.
Parę dni temu widziałem na Youtubie filmik jak koleś robił plakat w Corelu, nagle coś kliknął i zniknęło mu wszystko poza krawędziami strony. Tylko, że było to tak pokazane, że nie było widać co on dokładnie kliknął.
Martin Nez - 29 Styczeń 2011, 14:54
Spróbujcie użyć tego skryptu:
| Kod: | Sub TylkoStrona()
Dim lngSzerokosc As Long
Dim lngWysokosc As Long
Dim lngRozmiar As Long
ActiveDocument.Unit = cdrMillimeter
ActiveDocument.ReferencePoint = cdrBottomLeft
lngRozmiar = CorelDRAW.CorelScript.GetPageSize(lngSzerokosc, lngWysokosc)
ActivePage.Shapes.All.CreateSelection
Dim s1 As Shape
Set s1 = ActiveSelection.Group
s1.Name = "Usun"
Dim s2 As Shape
Set s2 = ActiveLayer.CreateRectangle(0#, lngWysokosc / 10000, lngSzerokosc / 10000, 0#)
s2.Fill.ApplyNoFill
Dim s3 As Shape
Set s3 = s2.Intersect(s1, True, True)
s1.Delete
s2.Delete
s3.Ungroup
End Sub
|
Powinien pomóc...
pozdr,
Martin Nez
chezare - 30 Styczeń 2011, 01:02
W X3 działa i na krzywe i na teksty i na bitmapy.
Martin Nez - 30 Styczeń 2011, 02:20
Czyli można powiedzieć, że działa... :) Zastanawiałem się tylko nad krzywymi z przejściami tonalnymi. Pewnie będą się sypać, ale jeszcze tego nie miałem okazji sprawdzić. :)
Pozdr,
MN
chezare - 30 Styczeń 2011, 07:36
Działa choć tak jak przewidujesz nie obcina przejść tonalnych na jakimś pośrednim kolorze, ale to można obejść zamieniając taką figurę na bitmapę. Bardzo przydatny skrypt.
To jest to samo, co zgrupować wszystkie elementy, kliknąć 2x prostokąt żeby narysował się wielkości strony, a później znaleźć część wspólną dla prostokąta i zgrupowanej grafiki. Tylko że tak można zrobić dopiero w X3.
Martin Nez - 30 Styczeń 2011, 11:26
chezare, właśnie tak działa ten skrypt. :) Faktycznie można zamieniać takie obiekty na bitmapy, ale jednak ja wolę poprawić kilka krzywych z przejściem niż w przyszłości zamieniać bitmapy na krzywe...
PS. Widziałem w jakimś temacie, że też piszesz skrypty, masz jakieś ciekawe na koncie? Mógłbym zerknąć? Moze jakiś fajny pomysł wpadnie mi do głowy...
chezare - 30 Styczeń 2011, 13:45
Piszesz skrypty, to za dużo powiedziane. Raz prosiłem o pomoc, bo nie wiedziałem jak do formularza wczytać listę zainstalowanych fontów, a ponieważ nikt mi nie pomógł, to się zawziąłem i sam wykombinowałem :) Kiedyś sporo się VB posługiwałem w Excelu, ale to zamierzchłe czasy. Dawno temu programowaniem zajmowałem się zawodowo, a VB taki sam język jak każdy inny. Taki efekt można uzyskać bez żadnych sztuczek, mało tego cieniowany obiekt podzieli się na krawędzi strony jeśli zapisze się dokument do pdfa i z powrotem otworzy w Corelu.
|
|