|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
12.12.2010, 16:17 | #1 |
Регистрация: 01.12.2010
Сообщений: 4
|
Панель инструментов
Суть вот в чем: у меня есть 3 кнопки ( жирный, курсив и подчеркивание)
void __fastcall TForm1::ToolButton8Click(TObject *Sender) { if(ToolButton8->Down==true) ((TForm2*)Form1->ActiveMDIChild)->Memo1->Font->Style=TFontStyles()<<fsBold; else ((TForm2*)Form1->ActiveMDIChild)->Memo1->Font->Style=TFontStyles(); } //--------------------------------------------------------------------------- void __fastcall TForm1::ToolButton9Click(TObject *Sender) { if(ToolButton9->Down==true) ((TForm2*)Form1->ActiveMDIChild)->Memo1->Font->Style=TFontStyles()<<fsItalic; else ((TForm2*)Form1->ActiveMDIChild)->Memo1->Font->Style=TFontStyles(); } //--------------------------------------------------------------------------- void __fastcall TForm1::ToolButton10Click(TObject *Sender) { if(ToolButton10->Down==true) ((TForm2*)Form1->ActiveMDIChild)->Memo1->Font->Style=TFontStyles()<<fsUnderline ; else ((TForm2*)Form1->ActiveMDIChild)->Memo1->Font->Style=TFontStyles(); } они по-отдельности хорошо работают. а как сделать так, чтоб они и вместе смогли работать. То есть если нажат курсив и сразу потом нажимают жирный, то текст становился жирным курсивоv, а не просто курсивом?? Как то не хочется кучу if вводить.. Последний раз редактировалось Лия92; 12.12.2010 в 16:24. |
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Панель инструментов для картинок в IE ! | chepuxa | Софт | 0 | 04.10.2009 12:10 |
Не отображается Панель инструментов | haros | Microsoft Office Excel | 11 | 21.07.2009 06:03 |
Панель инструментов VBA | Lyubov1990 | Microsoft Office Excel | 5 | 04.06.2009 09:52 |
Вложенная панель инструментов. | haros | Microsoft Office Excel | 7 | 16.03.2009 14:38 |
Пропала панель инструментов | delphin100 | Операционные системы общие вопросы | 2 | 24.08.2008 13:29 |