Corel FORUM

Robsoninho

Siema
Mam do napisania prace na temat "Zastosowanie skryptów automatyzujących pracę w CorelDraw" jakby ktoś miał jakieś materiały na ten temat byłbym wdzięczny. Chodzi tu głównie o pokazanie zasady działania paru skryptów i ogólnie napisanie o skryptach (czyli po co sie to je). Za wszelkie dodatkowe materiały bede mega wdzieczny

maroQ

Robsoninho

Jeszcze aktualne, mam czas do wrzesnia :) Dzięki za odpowiedź i za przydatne linki.
Chodzi w tym temacie ogólnie o pojęcie skryptu metody ich tworzenia i pokazanie paru przykładów na jakiej zasadzie działają. Raczej będę pisał o Makrach w VBA bo trochę o tym wiem a o CorelScript to nic a nic, poza tym ze cos takiego istnieje. Promotor mi nie określił czy to ma być CorelScript czy Makra w VBA
Fajnie by było gdyby te wszystkie informacje z Pomocy w VBA były po polsku, co prawda znam angielski ale niestety jest podwójna robota z tłumaczeniem. Nie masz może jakiś materiałów po polsku?
I tak już bardzo dziękuje za pomoc :) :poklon

maroQ

Odnośnie VBA to należało by zacząć od tego co o nim wiadomo czyli od krótkiego wprowadzenia do VB i powstania VBA. Użyteczna literatura to wszystko co tyczy się VBA np. dla Excela (sporo książek po polsku). Link do heliona

Niestety dla Corela nie ma żadnej dobrej literatury z zakresu VBA. Część wiedzy można oprzeć na Corel Script i przepisywać treści na VBA lub poprostu uzmysłowić sobie, na czym polega urok VBA. Główna esencja tego zagadnienia to możliwość rozbudowy lub automatyzacji żmudnych zadań wykonywanych w Corelu czy jakiejkolwiek innej aplikacji która wspiera VBA.

Każdy program który posiada możliwość dostępu do bibliotek lub plików exe poprzez obiekty COM (activeX) umożliwia dostęp analogiczny jak w VBA, ale to przeważnie wymaga dodania tzw. referencji do programu. Dostęp tego typu umożliwia podglądanie wszystkich publicznych obiektów funkcji itp. dostępnych z poziomu obiektu utworzonego na bazie danej biblioteki.

Z punktu widzenia makr w VBA nie trzeba tworzyć obiektów typu Application ponieważ one są już utworzone i by dostać się np. do danych dotyczących aktywnego dokumentu piszesz: "ActiveDocument." gdzie "." ma znaczenie takie same jak w C++ i innych językach wyższego rzędu. Jest to dostęp do obiektów danej klasy.

Nie chcę cię zanudzać tematem, ale jak chcesz przykład to powiedz co chcesz wykonać w Corelu. Nawet na tym forum znajdziesz bardzo wiele prostych i trochę bardziej złożonych przykładów na makra. Nie używam określenia "skrypty" bo są zbyt zbliżone do "corel script" i mogą być mylące. Szczególnie, że ludzie często nie rozumieją, że dostęp przez COM nie narzuca konieczności pisania programu w Visual Basicu. Sam COM należy traktować jak most między zabawkami którymi bawi się grafik w Corelu, a całym szeregiem czarnoksięskich machin i specyfików jakich używa programista. Przykładowo Alex Vakulenko posiada makro które rysuje prawie dowolny wykres w Corelu z możliwością rysowania jak w Matlabie czyli punkt po punkcie oraz z możliwością użycia tego co jest wbudowane w Corela czyli krzywych Beziera lub innymi słowy aproksymacji 3 punktowej. Sam dla jedego klienta przeniosłem całą logikę makra do bazy danych pozostawiając jedynie to co jest naprawdę potrzebne by wyświetlać wyniki w Corelu. Również odtworzenie dowolnej krzywej zapisanej w Corelu na podstawie tabelki z bazy danych nie stanowi żadnego problemu (tych tajników nie zdradzam bo to wiedza szamańska).

Robsoninho

To są studia inżynierskie na polibudzie ale praca nie jest jeszcze inżynierska tylko tzw."przejsciowa" z 6 na 7 semestr - wprowadzili to dopiero od tego roku i ma to nas przygotować do napisania inżynierki. W sumie promotor powiedział mi ze cała praca ma byc okolo 20 stronicowa, żebym znalazl i wybral sobie pare przydatnych "skryptów" i napisał na jakiej zasadzie one działają. Zaznaczył też żebym nie wchodził w tematy programowania bo to nie sa studia informatyczne tylko poligraficzne.
Co do planu pracy to mam taki dosyc ogólny i mysle ze mi akurat wyjdzie kolo 20 stron:
1. Pojęcie skryptu i makra - różnice między nimi
2. Sposoby pisania makra (rejestrowanie czynnosci i pisanie w vba)
3. Opis działania przykładowych 3 skryptow
4. Podsumowanie

Według mnie aby najlepiej pokazac zasade dzialania tych skryptow to zrobie to metoda screen + opis. Tak chyba to bedzie najbardziej czytelnie wygladac, chociaż moze sie troche zwiększyć objetosc pracy.

maroQ

Zerknij na książkę: "Automatyzacja CorelDraw. Skrypty" Andrzej Żak, Wydawnictwo Mikom.
To niestety są głównie Corel Script działające w Corel Draw 9. Coś tam z basica też jest, bo tak się składa, że w Corel Draw 9 wprowadzono VBA. Ta wersja jest ciekawa, bo ma rejestrator Corel Script. Kiedyś nawet próbowałem połączyć się z Corel Draw 9 z Javy i to się nawet udało (próby z nowszymi wersjami Corela nie poszły tak dobrze).

CorelScript nadal używa się w wielu narzędziach Corela np. Corel Photo Paint, gdzie można rejestrować tylko CorelScript. No ale to nie problem bo CorelScript można wywoływać z VBA, więc możliwości są całkiem spore (ale przypomina to trochę pisanie makr dla AutoCADa gdzie większość rzeczy też trzeba było wykonywać skryptem zewnętrznym).

Edytor Corel Script był niestety tylko w CDR9, w nowszych wersjach już go nie ma, ale do tego celu użyć VBA: Przykład by Shelbym (to jest metamorfoza, ale by zadziałała musisz zaznaczyć jakiś obiekt przed wywołaniem makra, zresztą w innym przypadku dostaniesz błąd który właśnie to stwierdzi.

Do screenów wgraj sobie PicPick lub HoverSnap, oba po odpowiedniej konfiguracji potrafią zapisywać screeny automatycznie. PicPick ma dodatkowo edytor screenów przypominający trochę rozbudowanego painta. Jest jeszcze takie coś jak Wink, ale osobiście średnio mi podchodzi, a przynajmniej nie do rejestracji screenów na potrzeby dokumentacji technicznej.

chezare

Sub test()
Dim s As String
Dim i As Integer
Dim t As Variant
t = Array(84, 111, 32, 116, 97, 107, 32, 106, _
97, 107, 98, 121, 32, 111, 112, 105, 115, 97, _
230, 32, 100, 122, 105, 97, 179, 97, 110, 105, _
101, 32, 97, 110, 97, 108, 111, 103, 111, 119, _
101, 103, 111, 32, 122, 101, 103, 97, 114, 107, _
97, 44, 32, 98, 101, 122, 32, 117, 191, 121, 119, _
97, 110, 105, 97, 32, 115, 179, 111, 119, 97, 32, _
116, 114, 121, 98, 46, 32, 68, 111, 98, 114, 101, 32, 58, 45, 41)
s = ""
For i = 0 To 84: s = s + (Chr(t(i))): Next i
MsgBox s
End Sub

maroQ

chezare

Gdybym wiedział, że w tzw. międzyczasie w temacie znajdzie się Twój tekst, to bym się nie wygłupiał :-)

Robsoninho

Dzieki Panowie za odpowiedzi.
Ksiażke "Automatyzacja CorelDraw. Skrypty" posiadam i przydała mi się na samym początku do zrozumienia idei tego wszystkiego. Ale tak jak napisałeś to jest w sumie tylko do Corela 9 bo tylko tam jest CorelScripts. Ale mimo wszystko przydała się.
Teraz mam do Was taką prośbę, mianowicie chciałbym połączyć przyjemne z pożytecznym. Ojciec chciałby zautomatyzować swoją pracę w Corelu poprosił mnie żebym mu napisał makro - jako że jeszcze nie za bardzo się orientuje w sprawach programowania, stąd moja prośba czy moglibyście mi pomóc to napisać. Przy okazji opisałbym działanie tego makra w swojej pracy.
Chodzi o to że jest sobie lista nazwisk w .txt i trzeba je dopasować do prostokątu o wymiarach 70mm x 16mm. Nazwiska mają być w Arialu 24pkt.
Jest możliwe zrobienie czegoś takiego?
W załączniku przesyłam efekt końcowy jak to powinno wyglądać.

nazwiska.jpg

Pobierz Plik ściągnięto 550 raz(y) 112.04 KB

maroQ

Robsoninho

Jesteś wielki!! Dziękuje w imieniu swoim i mojego ojca :) :poklon

Jest to duże ułatwienie i przyspieszenie pracy.
Jednak mam jeszcze pewne "wytyczne":
1. Chodzi właśnie o ten obszar ramek, bo nazwiska trafiają się większe i niestety wychodzą poza ten prostokąt.
Myślałem żeby dodać warunek jeżeli napis jest większy od 70mm to wtedy ramka ma się powiększyć o 5mm, ale niestety nic mi nie wychodzi...
2. Nazwiska powinny być w kapitałkach
3. Chciałbym żeby Corel ściągał dokładnie to co jest w notatniku bez zmiany imienia w inicjał
4. Próbowałem własnymi siłami dodać dodatkową ramkę wewnątrz tej 70mm x 16mm ale nie mogę jej w poprawny sposób wyśrodkować, ta mniejsza ma wymiary 67mm x 13mm. Przesyłam w załączniku jak chciałbym żeby to wyglądało.
Jeszcze raz wielkie dzięki, jeżeli dałbyś radę jeszcze to zrobić to nie wiem jak mam Ci dziękować.

NAZWISKA2.jpg

Pobierz Plik ściągnięto 529 raz(y) 79.95 KB

maroQ

Robsoninho

Jestem nowy na tym forum więc nie wiedziałem skąd się wzięła ksywka szaman, ale już będę wiedział.
Posiedziałem trochę nad tym kodem, przeanalizowałem go i udało mi się dodać prawie wszystkie poprawki jakie chciałem: centrowanie w poziomie,litery jako kapitałki, pobieranie tekstu bez dzielenia imienia i dodanie drugiej ramki.
Ale mam problem z wielkością ramki przy dłuższych nazwiskach mianowicie nie wiem jak napisać warunek żeby one się zwiększały gdy napis jest dłuższy.
Masz jakiś pomysł na zrobienie tego? Albo jakąś podpowiedź?

maroQ