Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.09.12;
Скачать: CL | DM;

Вниз

Скрипты   Найти похожие ветки 

 
*Pavel ©   (2004-08-26 10:39) [0]

Есть некия язык управления оборудованием, т.е. скрипт, который посылается напрямую в LPT.
Например:

AssignFile(F,"LPT1");
Rewrite(F);

Writeln(F,"^XA");
Writeln(F,"^LH20,20");
Writeln(F,"^FO20,10^A0,32,25^FD" + cbModel.Text + "^FS");
и т.д.
CloseFile(F);

В этом фрагменте скрипта вставляется одна внешняя переменная cbModel.Text, но дальше таких переменных намного больше. Одним словом пропадает читабельность самого скрипта + я не могу в таком случае сохранить этот скрипт во внешнем файле, каждый раз, когда нужно что-либо подправить приходится пересобирать исходник.

Есть ли какое-нибудь красивое решение ?


 
TUser ©   (2004-08-26 11:20) [1]

Я работаю постоянно с одной внешней программой, у которой свой скриптовый язык. Не девайс, конечно, но задача похожая. Да, скрыпты формирую примерно так - в программе из переменных. Нарисовать что-то универсальное вряд ли возможно, т.к. задачи могут возникать совершенно различные, и соотвественно тексты скриптов очень сильно отличаются. Короче, я сделал себе отдельный модуль, который прицепляю к проектам, а там реализовал все стандартные ф-ции (открыть прогу, закрыть прогу, послать команду и т.д.). В этом же модуле и запоминаю текст скрипта, если надо, могу его потом сохранить. + некоторые стандартные команды скриптового языка реализовал в виде отдельных ф-ций. Но большая часть скрипта, конечно, пишется руками. Command("..."). Меня, в принципе устраивает.


 
*Pavel ©   (2004-08-26 12:58) [2]

Может вариант с FastScript будет лучше.
Если есть спецы в Fast Scripte - отзовитесь.



Страницы: 1 вся ветка

Текущий архив: 2004.09.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.055 c
10-1016000720
GenBr
2002-03-13 09:25
2004.09.12
Передача интерфейса


9-1084692946
MsShtaer
2004-05-16 11:35
2004.09.12
Как использовать швейдера в Delphi


10-1015935751
Nikols
2002-03-12 15:22
2004.09.12
Лента новостей в мире технологий


6-1089068198
RaPToR_1
2004-07-06 02:56
2004.09.12
сокет в компоненте


8-1087795508
ИМХО
2004-06-21 09:25
2004.09.12
Создать Flash-файл средствами Delphi