Макрос CorelDraw? Заполнить обьект контурными линиями и удалить пер. обьект

  • Автор темы Автор темы TheMarshal
  • Дата начала Дата начала
Статус
Закрыто для дальнейших ответов.

TheMarshal

Участник
Топикстартер
Сообщения
11
Реакции
0
Суть макроса. Есть обьект с кореле. Нужно выделить его и нажать кнопку макроса. Макром должен заполнить обьект контурными линиями с шагом "N" мм. и удалить первичный обьект, оставив контурные линии.

Макром нужен для обработки на станку чпу выборок. "N" это радиус фрезы

Помогите пожалуйста с написанием.
 
Ответ: Макрос CorelDraw? Заполнить обьект контурными линиями и удалить пер. обьект

Вот набросок...
 

Вложения

Ответ: Макрос CorelDraw? Заполнить обьект контурными линиями и удалить пер. обьект

Спасибо. Подскажите, что делать этими двумя файлами? как их подключить к корелу?
 
Ответ: Макрос CorelDraw? Заполнить обьект контурными линиями и удалить пер. обьект

Оказалось, нужно импортировать... получается запускать, только с редактора вба, а вот с самого файла не получается. Хотел посмотреть пример кода, что бы досоображать макрос.

В целом это только часть макроса. Макрос должен запускться автоматически с запуском корела. Иметь 3 горячих клавиши. Наружный контур, внутрений контур и заполнить контурными линиями. так же желательно, что бы после этого выпадало окошко с предложением сохранить файл с именем . и процедура сохранения в формате .plt. Сейчас на клацания мышкой уходит большое кол-во времени и часто бывают ошибки, из-за "забыл стереть", "забыл выбрать нужный фомат сохранения"
 
Ответ: Макрос CorelDraw? Заполнить обьект контурными линиями и удалить пер. обьект

Проще написать 3 процедуры без всяких форм, назначить на них клавишные сочетания и радоватся...
 
Ответ: Макрос CorelDraw? Заполнить обьект контурными линиями и удалить пер. обьект

TheMarshal сказал(а):
Оказалось, нужно импортировать... получается запускать, только с редактора вба, а вот с самого файла не получается. Хотел посмотреть пример кода, что бы досоображать макрос.
Код там же -- двойной клик на форме... Чтобы завести на горячие клавиши нужно сделать новый модуль и написать

public sub XXXX()
ufFRESA.Show
end sub

тогда ХХХ сможешь ГК повесить

TheMarshal сказал(а):
В целом это только часть макроса. Макрос должен запускться автоматически с запуском корела. Иметь 3 горячих клавиши. Наружный контур, внутрений контур и заполнить контурными линиями. так же желательно, что бы после этого выпадало окошко с предложением сохранить файл с именем . и процедура сохранения в формате .plt. Сейчас на клацания мышкой уходит большое кол-во времени и часто бывают ошибки, из-за "забыл стереть", "забыл выбрать нужный фомат сохранения"

Эта задача несколько отличается от первопоставленной...
И в этой задаче нужно проводить большое колчество проверок, поскольку вы хотите максимально снизить зависимость от визуального контроля... Думаю вам сложно самому разработать данное приложение...
 
Статус
Закрыто для дальнейших ответов.