Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Последние темы форума

Показать новые сообщения »

Почтовая рассылка

Подписчиков: 6464
Последний выпуск: 19.06.2015

Текст разного цвета в StringGrid

4.1K
13 мая 2003 года
Romanus
2 / / 13.05.2003
Как сделать так, чтобы текст в одной ячейке StringGrid отличался по цвету от текста других ячеек? Помогите, пожалуйста!
369
13 мая 2003 года
Non_prog
193 / / 20.03.2000
Цитата:
Originally posted by Romanus
Как сделать так, чтобы текст в одной ячейке StringGrid отличался по цвету


В событии OnDrawCell компонента StringGrid
напиши :
if (ACol == 1 && ARow == 1)
{
StringGrid->Canvas->Brush->Color = clRed;
StringGrid->Canvas->FillRect(Rect);
}
:)

4.1K
14 мая 2003 года
Romanus
2 / / 13.05.2003
Да, но тогда просто разукрашивается ячейка в указанный цвет, а как быть, если цвет ячейки нужен такой же (это можно сделать, например, вместо clRed поставить clWhite), а вот текст чтобы был другого цвета?
357
14 мая 2003 года
moonmike
423 / / 18.10.2002
Цитата:
Originally posted by Romanus
Да, но тогда просто разукрашивается ячейка в указанный цвет, а как быть, если цвет ячейки нужен такой же (это можно сделать, например, вместо clRed поставить clWhite), а вот текст чтобы был другого цвета?


F1 нажимать пробовал??
if (ACol == 1 && ARow == 1)
{
AnsiString S = StringGrid->Cells[1][1];
StringGrid->Canvas->Font->Color = clRed;
StringGrid->Canvas->TextOut(Rect.Right-2-
StringGrid->Canvas->TextWidth(S),
Rect.Top+2,S);
}

357
14 мая 2003 года
moonmike
423 / / 18.10.2002
Цитата:
Originally posted by Romanus
Да, но тогда просто разукрашивается ячейка в указанный цвет, а как быть, если цвет ячейки нужен такой же (это можно сделать, например, вместо clRed поставить clWhite), а вот текст чтобы был другого цвета?


F1 нажимать пробовал??
if (ACol == 1 && ARow == 1)
{
AnsiString S = StringGrid->Cells[1][1];
StringGrid->Canvas->Font->Color = clRed;
StringGrid->Canvas->TextOut(Rect.Right-2-
StringGrid->Canvas->TextWidth(S),
Rect.Top+2,S);
}

100K
30 сентября
vikbrdin
1 / / 30.09.2018

Знаете кого-то, кто может ответить? Поделитесь с ним ссылкой.

Ваш ответ

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог