и
"РЛ" - НАЧИНАЮ Щ ИМ
и
«**яш і
Файл
ЯВИ
Спевка
[
Шрифт
@
1
Г
его на форму и растянем произволь-
но. Теперь в инспекторе объектов
(р и с . 6 )
в свойстве
L in e s
нажмем на
значок “многоточие” - появилось
окно (String List Editor) редактора тек-
ста
T M e m o ,
сотрем в окне TMemol и
нажмем
О К .
Затем мы добавим колонку про-
крутки или, на языке программиро-
вания, ScrollBar. В инспекторе
объектов
( р и с . 6 )
найдем свойство
S c r o llB a r
и зададим там значение
ssVertical - это будет вертикальная
колонка прокрутки.
Приступим к программированию
кнопки
T M a in M e n u .
Найдем на па-
нели компонентов вкладку
D ia lo g s ,
выберем
оттуда
компоненты
O p e n D ia lo g , S a v e D ia lo g , F o n tD ia lo g
и расположим их на форме. Выберем
в форме в уже сделанной верхней
вкладке (Файл) кнопку (Открыть)
двойным щелчком левой кнопки
мыши, и запишем в открывшемся
окне (Unitl .срр), в редакторе текста,
в том месте, где мигает курсор, сле-
дующие строки (врезка 1).
Рис. 3
Файл Формат
___ ;
О программе
Рис. 4
• |
*• і
:гГ
а
Мелто)
Properties I Events j
і
D(agD.«sor
crOiag
&
Ьіьф'.гЛ
jdkOtag
DragMode
dmManua}
Enabled
true
a
Font
ITFont)
Height
345
HelpConteKt
0
He)pK.tywofd
HefpType
NContetf
HtdeS election
hue
Hoit
ImeMode
unDontCaie
Left
48
|
lines
fTShrrgsl
3
Ma>ler.afh
0
AS shown
Рис. 6
Рис. 5
После того как мы внесли эту за-
пись, в инспекторе объектов для ком-
понента
O p e n D ia lo g
в свойстве
F ilte r
нажмем на значок “многоточие”, пе-
ред нами откроется окно (Filter Editor)
редактора
O p e n D ia lo g ,
где мы зада-
ем форматы файлов, которые будет
открывать наша программа. В пер-
вой строке левого столбца (Filter
Name) пишем txt, а в правой строке
(Filter) пишем *.txt и наживаем ОК
(р и с . 7).
Теперь программируем кнопку (Со-
хранить). Нажмем двойным щелчком
на эту кнопку и пишем в появившемся
окне (Unitl .срр) следующее (врезка 2).
Программируем последнюю кноп-
ку вкладки (Файл) - кнопку (Выход)
(врезка 3).
Следующий шаг - программиру-
ем в вкладке (Формат) кнопку
(Шрифт). Нажмем на нее два раза
•левой кнопкой мыши и в появившем-
ся окне пишем (врезка 4).
Осталось запрограммировать в
вкладке (Справка) кнопку (О про-
грамме).
ії(ОрепОіаІод1->Ехеси1еО);
\ зап ускаем д иалоговое о кн о объекта
©
О реп йіаіод
Мето1->ипе8->ЕоагірготРіІе(0рЄпЬіаІод1->РіІе№ітіе); \
В ы бранны й ф айл
за г р уж а е м в Т М ет о (в паніє, где будет текст)
К(ОрепОіаІод1 ->ЕхесіЛе())
@
Мето1 ->Еіпе8-Я-оагіЕготЕіІе(0реп0іаІод1 ->ЕНе№те); \
загруж енны й ф айл
Н(вауеОіаІод1 ->ЕхесіЛе()) I
зап ускаем объект SaveDia1og
'
Мето1 ->иіпез->5аУеТоРі1е(5ауе0іаІод1 ->РПеЫате); I
С охраняем текст
с
поля
Рогт1 ->С1о8е(); I
закр ы ваем ф о р м у (т.е. закр ы в аем програм м у)
©
й(РопЮ1а1од1 ->Ехеси1е()) |
открываем окно редактора шрифта
@
Мето1 ->Роп1=РопШ1а1од1 ->РопЦ \
вы бранное н а м и в о кне шрифта применим о
к н а ш е м у полю
Радиолюбитель - 10 /2 0 0 7 (J
39
предыдущая страница 39 Радиолюбитель 2007-10 читать онлайн следующая страница 41 Радиолюбитель 2007-10 читать онлайн Домой Выключить/включить текст