Corel FORUM

[Foodall]

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]

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]

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]

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]

W X3 działa i na krzywe i na teksty i na bitmapy.

[Martin Nez]

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]

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]

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]

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.