Как использовать uses в скрипте

Vita · May 2005

подскажите, пожалуйста, как подключать модули внутри скрипта.
Такой код вызывает ошибку "begin expected" :
fsScript1.Clear;
fsScript1.lines.text:='program pr1; uses ''unit1.pas''; begin end.';
fsScript1.Parent:=fsGlobalUnit;
fsScript1.SyntaxType:='PascalScript';
fsScript1.Execute
Нужно, чтобы внутри скрипта вызывалалась функция, тело которой находится в unit1.pas. Или подключать функции нужно как-то иначе?

-=Serg=- · May 2005

Проблемы помоему в кавычках.
Думаю так:

fsScript1.lines.text:='program pr1; uses ' + QuotedStr('unit1.pas') +'; begin end.';

Vita · May 2005

Попробовала с QuotedStr - то же самое, 'begin' expected

-=Serg=- · May 2005

Тогда откройте демонстрационные скрипты
FastScript\Demos\Main\Samples\PascalScript\unit1.pas и
FastScript\Demos\Main\Samples\PascalScript\unit2.pas
и разберитесь почему они работают, а ваши нет.

AlexTZ · May 2005

Модуль, который вы используете, должен содержать не только тело ф-и, но и блок begin..end.

Dvin · May 2005

удалите, пожалуйста, это сообщение

Как использовать uses в скрипте

Комментарии

Оставить комментарий