Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.11.2010, 15:52   #1
Sfera
 
Регистрация: 06.04.2009
Сообщений: 7
По умолчанию Помгодите с отчетом QReport в БД

Такое задание: есть отчет, в котором есть поле "Цвет машины", в котором выводятся цвета (синий, красный и так далее). как мне в компоненте 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;
Изображения
Тип файла: jpg отчет.JPG (42.6 Кб, 115 просмотров)
Sfera вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
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