Программирование
jp m r
n28.Caption:=MyIni.Readstring('menu', 'findnext',
'АШИПКА1!!');
n29.Caption:=MyIni.Readstring('menu', 'view',
' АШИПКА1 ! ! ') ;
n30.Caption:=MyIni.Readstring('menu', 'color',
'А11ШПКА! ! ! ') ;
n34.Caption:=MyIni.Readstring('menu', 'font',
'АШИПКА! I!');
n35.Caption:=MyIni.Readstring('menu', 'service',
'АШИПКА! !!');
пЗб-Caption:=MyIni.Readstring]'menu', 'Orthography',
'АШИПКА!!!');
n37.Caption:=MyIni-Readstring('menu', 'spelling',
'АШИПКА! !!');
n38.Caption:=MyIni.Readstring('menu', 'statistics',
'АШИПКА! ! ! ' ) ;
n4 0.Capt ion:=MyIni.Readstring('menu', ' Export',
'АШИПКА!! ! ' ) ;
n41.Caption:=MyIni.Readstring('menu', ' import',
'АШИПКА! ! ! ') ;
n42.Caption:=MyIni.Readstring('menu', 'Plugins',
'АШИПКА!!!');
n43.Caption:=MyIni,Readstring('menu', 'PluginAdd',
'АШИПКА! ! ! ') ;
n44.Caption:=MyIni.Readstring('menu', 'PluginDel',
'АШИПКА! ! ! ' ) ;
n45.Caption:=MyIni.Readstring('menu', 'AllPlugin',
'АШИПКА! !!');
n46.Caption:=Mylni.Readstring('menu', 'Tools',
'АШИПКА! ! ! ' ) ;
n47.Caption:=MyIni.Readstring('menu', 'AddTools',
'АШИПКА! ! ! ' ) ;
n50.Caption:=MyIni.Readstring('menu', 'DelTools',
'АШИПКА!! ! ’ ) ;
nllO.Caption:=MyIni.Readstring('menu', 'Programml',
'АШИПКА! ! ! ') ;
n210.Caption:=MyIni.Readstring('menu', 'Programm2',
'АШИПКА! ! ! ' ) ;
n310.Caption:=MyIni.Readstring('menu', 'Programm3',
'АШИПКА!!!');
n51.Caption:=MyIni.Readstring('menu', 'Help',
'АШИПКА! ! ! ') ;
n52.Caption:=MyIni.Readstring('menu', 'Manual',
'АШИПКА!I ! ') ;
n53.Caption:=MyIni.Readstring('menu', 'FAQ',
'АШИПКА! ! ! ') ;
n54.Caption:=Mylni.Readstring('menu', 'License',
'АШИПКА! ! ! ' ) ;
n55.Caption:=MyIni.Readstring( 'menu', 'Registration',
'АШИПКА! ! ! ' ) ;
n57.Caption:=MyIni.Readstring('menu', 'AboutAnthor',
'АШИПКА! ! ! ' ) ;
n58.Caption:=MyIni.Readstring('menu', 'AboutProgramm',
'АШИПКА! ! ! ') ;
dialog[l]:=MyIni.Readstring('dialogs', 'Manual',
'АШИПКА! ! ! ') ;
dialog[2]:=MyIni.Readstring('dialogs', 'FAQ',
'АШИПКА! ! ! ' ) ;
dialog[3]:=MyIni.Readstring('dialogs', 'License',
'АШИПКА!!!');
dialog[4]:=MyIni ReadString('dialogs', 'Registration',
'АШИПКА! ! ! ' ) ;
dialog[5]:=MyIni Readstring('dialogs', 'AboutAuthor',
'АШИПКА! !!');
dialog[6]:=MyIni Readstring('dialogs', 'AboutProgramm',
'АШИПКА! ! ! ' ) ;
dialog[7]:=Mylni.Readstring('dialogs', 'Exit',
'АШИПКА! ! !') ;
end;
Объясним лишь, что означает эта самая
МуIni.Readstring на примере: МуIni.Readstring('di-
alogs', 'Exit', 'АШИПКА!!!').
Эта функция отвечает за считывание текстовой информации из
ini-файла. Похожими функциями являются
ReadBool
или
Readln-
teger,
соответственно, для считывания булевых или целочислен-
ных значений. То, что в скобках, означает примерно следующее:
(ищите информацию в разделе [dialogs] , под названием
Exit, если не найдете, напишите
'АШИПКА!! ! ' ) .
После этого мы произвели контрольное тестирование, и ре-
зультат оказался удовлетворительным — программа меняла язык
интерфейса в зависимости от выбранного элемента в Combobox'e.
При закрытии в файл Larg.txt записывается индекс Combobox'a, а
после запуска он считывается из того же файла, и пользователю
не приходится выбирать язык при каждом запуске программы.
1.4.4. Выводы
В ходе данной лабораторной работы мы научились создавать
демонстрационное программное обеспечение, поддерживающее
несколько языков, используя при этом файлы М-формата.
Примечания проверяющего:
При выполнении лабораторной работы были допущены су-
щественные ошибки. Самой заметной из которых является та
самая повторная проверка значения переменной в. В про-
грамме, которую создал Автор, избыточное потребление ре-
сурсов практически незаметно, но в более сложных програм-
мах это может сильно замедлить работу компьютера, загру-
зив его оперативную память. Также для хранения информации
о языке интерфейса, выставленном в предыдущем сеансе, Ав-
тор использовал текстовый файл. Без данных, получаемых про-
граммой из этого файла, программа не смогла бы полноцен-
но функционировать, а удаление текстового файла может про-
изойти в любую минуту. Для подобных целей целесообразнее
использовать записи, хранящиеся в реестре, но для такой про-
граммы нужно было бы создавать и деинсталлятор. Еще од-
ним недостатком является немаленький размер программы —
ехе-файл занимает 424 Кб. Притом программа почти ничего
и не выполняет. Но такова проблема практически всех про-
грамм, написанных в среде программирования 0е1рЫ.
В целом же поставленная задача перед Автором была вы-
полнена, хоть и с указанными недостатками, поэтому сдача
лабораторной зачтена.
Балл, 4 (хорошо).
предыдущая страница 38 Мой Компьютер 2005 06 читать онлайн следующая страница 40 Мой Компьютер 2005 06 читать онлайн Домой Выключить/включить текст