Как сделать чтобы у вашей программы можно было бы поменять цвет
                                                    и шрифт текста)*
\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\
Для этого понадобятся такие элементы, как:
ColorDialog1: TColorDalog  и  FontDialog1: TFohtDialog

1.Работа с цветом формы:
Пишем програмный код к кнопке (Button1: TButton)
------------------------------------------------------------------------------------------------------------------------------
procedure TForm1.Button1Click(Sender: TObject);
begin
If ColorDialog1.Execute Then
Form1.Color:=ColorDialog1.Color;
end;

end;
--------------------------------------------------------------------------------------------------------------------------------
2.Работа с шрифтом текста формы:
Пишем програмный код к кнопке (Button2: TButton) 
--------------------------------------------------------------------------------------------------------------------------------
procedure TForm1.Button2Click(Sender: TObject);
begin
FontDialog1.Font:=Form1.Font;
If FontDialog1.Execute Then
Form1.Font:=FontDialog1.Font;
end;

end;
---------------------------------------------------------------------------------------------------------------------------------
)* - Этот элемент уже используется в моих прграммах,
 и вы можете подгрузить их самих и
их проекты на моём сайте по адресам:
http://www.kudruavtsev.narod.ru/stopw.html

Автор программы, идеи и текста: Кудрявцев Юра (PAYBACK co. #2000)

Internet: http://www.kudruavtsev.narod.ru
Mail-me: backpayback_yura@mail.ru