Corel FORUM

sthefciu

Korzystam z programu Corel Draw i Corel Photo Paint x5, więc może być to np. jakiś skrypt do Photopainta lub inny jakis sposob. chodzi o szybkie wstawienie miniaturki obrazka do ramki i eksport do png czy jpg, jka w zalaczeniu

corel.jpg

Pobierz Plik ściągnięto 130 raz(y) 177.19 KB

tegraf

Mało precyzyjnie. To pomyślmy chwilę, jakby to miało działać.

Skrypt: wskazuję plik na dysku, skrypt umieszcza go na rysunku.
Ręcznie: wskazuję plik na dysku i importuję do rysunku.

Pliki importowane mogą być różnych rozmiarów, więc bez określenia docelowego rozmiaru importowanej grafiki i jej położenia (np. poprzez wskazanie współrzędnych lewego górnego narożnika) - ilość czynności jest podobna (wskazanie pliku na dysku, gdzieś tam pewnie poklikanie kilka razy OK), dopasowanie rozmiaru (przeskalowanie), określenie precyzyjne położenia.

Gdzie zysk? Nie ma.

Może w takim razie będzie lepiej przy wielu plikach.

Skrypt: wskazuję pliki na dysku (raczej wskazuję folder w plikami), skrypt umieszcza pliki w nim zapisane na kolejnych stronach rysunku z takim samym podkładem. Samodzielnie, 10000 razy.
Ręcznie: wskazuję plik na dysku i importuję do rysunku. Powtarzam 10000 razy.

Jest trochę lepiej - o tyle, że nie wskazuję 10000 razy kolejnych importowanych plików. Dalej jednak pozostaje czynność dopasowania rozmiarów i określenia położenia, bez tego nie można przejść do eksportu.

Czyli bardziej precyzyjnie: poszukujesz skryptu, który samodzielnie pobierze 10000 plików z dysku, umieści je na podkładzie, przeskaluje do odpowiedniego rozmiaru, umieści w odpowiednim miejscu i zapisze (każdą stronę osobno).

To będzie trudno coś znaleźć.

Kluczowa jest kwestia skalowania importowanej grafiki. Importowane pliki muszą zmieścić się w określonym "okienku", czyli skrypt musi sprawdzać, czy przeskalowana grafika do odpowiedniego rozmiaru w pionie, zmieści się w wyznaczonym miejscu w poziomie (i odwrotnie) i skalować tak długo, aż oba wymiary będą spełniać ten warunek. Może to robić skrypt, może inne, zewnętrzne narzędzie (InfraView?).

I drugi problem: pewnie byłoby dobrze, gdyby importowana grafika w przeznaczonym dla niej miejscu była centrowana w pionie i w poziomie, a to oznacza, że pomysł ze wskazaniem lewego górnego narożnika się nie sprawdzi. Trzeba wskazać punkt środkowy "okienka" i do niego wyrównywać środek importowanej grafiki.

No to czekamy. Może ktoś ma, może ktoś się podejmie napisania. Sam pomysł jest ciekawy.

chezare

Moim zdaniem to zadanie jest mało ciekawe z przynajmniej dwóch powodów.
Pierwszym jest to, że to się może przyda Stefanowi ale nikomu więcej.
Drugi powód jest taki, że dla kogoś kto odrobinę orientuje się w corelowym VBA to jest robota na 3 min.
Komuś kto nie bardzo wie o co chodzi, tak jak ja, może to zająć znacznie więcej czasu, ale jestem przekonany, że w tym konkretnym przypadku pomoc Corela wystarczy do rozwiązania tego zadania :-)