Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.11.21;
Скачать: CL | DM;

Вниз

DBRichEdit текст   Найти похожие ветки 

 
sloug ©   (2004-10-23 16:08) [0]

Добрый день всем! Я решил сделать в своей программе выбор стиля текста. Поставил 3 ToolButton и начал писать код. Первая кнопка у меня "Жирный", вторая - "Наклон", третья - "Подчеркнутый". Для первой кнопки пишу:

If ToolButton3.Down then
DBRichEdit1.SelAttributes.Style:=[fsBold];
IF ToolButton3.Down and ToolButton4.Down and ToolButton5.Down Then
DBRichEdit1.SelAttributes.Style:=[fsBold,fsItalic,fsUnderLine];
IF ToolButton3.Down and ToolButton4.Down Then
DBRichEdit1.SelAttributes.Style:=[fsBold,fsItalic];
IF ToolButton3.Down and ToolButton5.Down Then
DBRichEdit1.SelAttributes.Style:=[fsBold,fsUnderLine]
                    else
If ToolButton4.Down and ToolButton5.Down Then
DBRichEdit1.SelAttributes.Style:=[fsItalic,fsUnderline];
If ToolButton4.Down then
DBRichEdit1.SelAttributes.Style:=[fsItalic];
If ToolButton5.Down then
DBRichEdit1.SelAttributes.Style:=[fsUnderLine];

Но при проверке этот код работает не так как надо. Обьясните что не так, или как сделать по другому. Спасибо!


 
vecna ©   (2004-10-23 16:25) [1]

а как нада ?
Style := Style +/- [] ?



Страницы: 1 вся ветка

Текущий архив: 2004.11.21;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.027 c
14-1099708204
Думкин
2004-11-06 05:30
2004.11.21
С днем рождения! 6 ноября


14-1099488222
John
2004-11-03 16:23
2004.11.21
Помогите решить задачу


1-1099899089
Андерсон
2004-11-08 10:31
2004.11.21
WinHelp - как вывести главное окно


1-1099778557
Logun
2004-11-07 01:02
2004.11.21
Сжатие данных


14-1099649363
Jeer
2004-11-05 13:09
2004.11.21
теория России