![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Регистрация: 06.04.2009
Сообщений: 7
|
![]()
Такое задание: есть отчет, в котором есть поле "Цвет машины", в котором выводятся цвета (синий, красный и так далее). как мне в компоненте QRDBText2 раскрасить текст, то есть через этот компнент я вывожу цвета, мне нужно, если написан цвет "синий" значит текст был синим, если "красный" - значит текст красный. помогите пожалуйста! Очень срочно нужно. вот мой код, который раскрашивает полностью все поле. Form1.Table1 - это я беру данные из таблицы, как раз цвет машины и записываю в QRDBText2.
begin Form1.Table1.First; while not Form1.Table1.Eof do begin if form1.Table1.FieldByName('Colorcar' ).AsString ='синий' then Form7.QRDBText2.Font.Color:= clBlue; if form1.Table1.FieldByName('Colorcar' ).AsString ='красный' then Form7.QRDBText2.Font.Color:= clRed; Form1.Table1.Next; end; end; |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
MS Access Проблема с отчетом | xmaksimca | Microsoft Office Access | 1 | 15.02.2010 10:55 |
Проблема с отчетом | Sholpan | Общие вопросы Delphi | 2 | 22.08.2008 23:12 |
Помогите с отчетом! | james0109 | БД в Delphi | 0 | 10.05.2008 15:05 |
запарилась с отчетом quickreport | Алёна | БД в Delphi | 2 | 20.03.2007 07:21 |
помогите с отчетом по курсовику | AGA | Помощь студентам | 3 | 18.01.2007 16:46 |