[olga87]

Здравствуйте Уважаемые программисты!

У меня есть кнопка на палитре (toolpalette), нажимая на которую нужно выполнить:

Код:

[Выделить все]

^C^C(if (= C:LayIns nil) (load "LayIns"));(LayIns "c:\\1.dwt" "А4");

Если я сама вставляю в командную строку

Код:

[Выделить все]

(LayIns "c:\\1.dwt" "А4")

и нажимаю Enter - то работает, НО не работает с кнопки на палитре, видимо мешают пробелы в команде.
Подскажите пожалуйста, как исправить код

Код:

[Выделить все]

^C^C(if (= C:LayIns nil) (load "LayIns"));(LayIns "c:\\1.dwt" "А4");

?
Заранее спасибо!

[koMon]

может на кнопку нужно вешать лисп конструкцию
^C^C(if (= C:LayIns nil) (load "LayIns") (LayIns "c:\\1.dwt" "А4"))

[Кулик Алексей aka kpblc]

koMon, странная немного у тебя конструкция, как мне кажется.
Я бы подумал о том, чтобы загружать исходник другими методами, а в палитрах просто вызывать соответствующие функции.

[koMon]

Кулик Алексей aka kpblc,
точно!
видимо правильнее будет так:
^C^C(progn (if (= C:LayIns nil) (load "LayIns")) (LayIns "c:\\1.dwt" "А4"))
но, как ты любишь подписывать, без проверки)
ну а загружать исходник, как мне кажется можно и из палитры, и по-другому...

----- добавлено через ~23 ч. -----
skkkk, что это было?!

[skkkk]

Сообщение от olga87 ^C^C(if (= C:LayIns nil) (load "LayIns"));(LayIns "c:\\1.dwt" "А4");

olga87, не могу понять: LayIns - это функция или команда? Вроде проверка идет на команду (C:LayIns), а запускается функция (LayIns) с двумя аргументами.

Вообще, если вспомнить шпаргалку по использованию лиспа, конструкция должна выглядеть как-то так:

Код:

[Выделить все]

^C^C(if (null C:OFF2)(load "off2"));OFF2;

Аналогичным будет:

Код:

[Выделить все]

^C^C(if (null C:OFF2)(load "off2"));(C:OFF2);

Конструкция (= C:LayIns nil) равнозначна (null C:LayIns)
Поскольку кода нет, придется погадать.

Сообщение от olga87 Если я сама вставляю в командную строку Код: [Выделить все] (LayIns "c:\\1.dwt" "А4") и нажимаю Enter - то работает, НО не работает с кнопки на палитре, видимо мешают пробелы в команде.

А если на палитру повесить просто эту строчку, обеспечив как-то иначе загрузку лиспа, будет работать?

Код:

[Выделить все]

(LayIns "c:\\1.dwt" "А4")

----- добавлено через ~1 мин. -----

Сообщение от koMon skkkk, что это было?!

Что-что? Фигню написал

[===AAA===]

Как насчет заменить "\\" на "/" ?

[VVA]

Сообщение от ===AAA=== Как насчет заменить "\\" на "/" ?

Так и нужно делать!!!