Конструктор учебных заданий для электронного задачника Programming Taskbook - 60 стр.

UptoLike

ВУЗ: 

ЮФУ | Ростов-на-Дону

Составители: 

Рубрика: 

60
6: MakerDemo6;
7: MakerDemo7;
8: if CurrentLanguage and lgWithPointers <> 0 then
MakerDemo8
else
MakerDemo8net;
9: if CurrentLanguage = lgPascalABCNET then
MakerDemo8Net;
end;
end;
В этой процедуре используется функция CurrentLanguage, позволяющая опреде-
лить текущий язык программирования, используемый задачником. Если текущий
язык относится к категории языков, поддерживающих указатели (в том числе
PascalABC.NET), то в качестве задания номер 8 вызывается процедура MakerDemo8, в
которой задание формулируется в терминах указателей. В противном случае вызыва-
ется вариант задания для .NET-языков, использующий объектную терминологию. На-
конец, если текущим языком является PascalABC.NET, то для него будет доступно
дополнительное задание номер 9, представляющее собой «объектный» вариант зада-
ния номер 8.
Функцию CurrentLanguage потребуется использовать и в начале процедуры
inittaskgroup для того, чтобы правильно определить количество заданий в группе для
разных языков программирования (обратите внимание на то, что теперь в качестве
предпоследнего параметра процедуры CreateGroup используется переменная n):
var
n: integer;
begin
case CurrentLanguage of
lgVB: n := 7;
lgPascalABCNET: n := 9;
else n := 8;
end;
CreateGroup('MakerDemo', 'Примеры различных задач',
'М. Э. Абрамян, 2009', 'qwqfsdf13dfttd', n, InitTask);
Новые задания следует протестировать для различных языков программирова-
ния. Для этого можно воспользоваться еще одной новой возможностью программы
PT4Demo, появившейся в версии 4.8: выбором языка программирования с помощью
контекстного меню. В данной ситуации следует изменить список параметров главно-
го приложения, положив параметр –n равным 0:
-gMakerDemo -n0. Благодаря этому
изменению при запуске проекта станет доступно окно программы PT4Demo, в кото-
ром можно будет изменить язык программирования (для этого достаточно нажать
правую кнопку мыши и выбрать требуемый язык из появившегося контекстного ме-
ню). Используя программу PT4Demo, не удастся проверить группу лишь для языка
PascalABC.NET. Подобную проверку можно выполнить только в среде
PascalABC.NET, выбрав в ней в качестве текущего тот каталог, в котором располага-
ется dll-файл с созданной группой.
Приведем вид окна задачника для новых заданий (см. рис. 6 и 7). Обратите вни-
мание на кнопки, расположенные справа от формулировки задания и обеспечиваю-
щие ее прокрутку.

Страницы