Программирование в среде Delphi. Часть 2. Создание оконных приложений. Садовская О.Б. - 36 стр.

UptoLike

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

36
then edit1.font.style:=edit1.font.style + [fsStrikeOut]
else edit1.font.style:=edit1.font.style - [fsStrikeOut];
if checklistbox1.Checked[1]
then edit1.font.style:=edit1.font.style + [fsUnderLine]
else edit1.font.style:=edit1.font.style - [fsUnderLine];
end;
Задачи
18. Создать оконное приложение, позволяющее менять цвет формы.
Выбор цвета осуществлять с помощью компонента radiogroup.
19. Создать оконное приложение, позволяющее для натурального чис-
ла n, введённого в поле edit, выполнить действие, которое можно вы-
брать с помощью компонента radiogroup.
20. Написать программу для преобразования введённой в поле редак-
тирования строки. Вид преобразования
удалить первую запятую
добавить в конце строки точку
первый знак ; заменить на ,
должен быть выбран с помощью компонента radiogroup.
                                        36
     then edit1.font.style:=edit1.font.style + [fsStrikeOut]
     else edit1.font.style:=edit1.font.style - [fsStrikeOut];
     if checklistbox1.Checked[1]
     then edit1.font.style:=edit1.font.style + [fsUnderLine]
     else edit1.font.style:=edit1.font.style - [fsUnderLine];
     end;


                                    Задачи
18. Созд а т ь окон н ое прилож ен ие, позволя ю щее м ен я ть цвет ф орм ы.
В ыб ор цвет а осу щест вля т ь с пом ощью ком пон ен т а radiogroup.




19. Созд а т ь окон н ое прилож ен ие, позволя ю щее д ля н а ту ра льн ого чис-
ла n, введ ён н ого в поле edit, выполн ит ь д ейст вие, кот орое м ож н о вы-
б ра т ь с пом ощью ком пон ен т а radiogroup.




20. Н а писа т ь програ м м у д ля преоб ра зова н ия введ ён н ой в поле ред а к-
т ирова н ия строки. В ид преоб ра зова н ия
                             у д а лит ь перву ю за пя т у ю
                             д об а вит ь в кон це строки точку
                             первый зн а к ; за м ен ит ь н а ,
д олж ен б ыть выб ра н с пом ощью ком пон ен т а radiogroup.