цветной текст в StringGrid1 - Общие вопросы Delphi

Jekasea · 17.12.2013, 22:42

Как в StringGrid1 вывести текст, что-бы только надписи "субота" , "воскресенье" и "выходной" были красным цветом.
ПРИМЕЧАНИЕ***: В процессе выполнения моей программы эти надписи могут появиться в любой ячейке StringGrid1.

Stilet · 17.12.2013, 22:48

Закрашивай в событии OnDrawCell:
http://www.programmersforum.ru/showthread.php?t=8416
http://www.programmersforum.ru/showthread.php?t=88806

Jekasea · 17.12.2013, 23:11

"субота" и "воскресенье" у меня выводится из DateTimePicker1:
StringGrid1.Cells[r,s]:=FormatDateTime(' mmmm', DateTimePicker1.Date);

"выходной" из массива:
var week: array[1..4] of string;
----------------
week[1]:=' 8';
week[2]:=' выходной';
week[3]:=' 12';
week[4]:=' 4';

Stilet · 17.12.2013, 23:26

Ну и прекрасно )
Анализируй ячейку, и если она содержит слово нужное:

Код:

if TStringGrid(Sender).Cells[Arow,Acol]='выходной'...

закрашивай.

Jekasea · 17.12.2013, 23:47

с "выходной" - понял как сделать,
а как быть с "субота" и "воскресенье"
StringGrid1.Cells[r,s]:=FormatDateTime(' mmmm', DateTimePicker1.Date);

northener · 17.12.2013, 23:59

Цитата:

Сообщение от Jekasea

с "выходной" - понял как сделать,
а как быть с "субота" и "воскресенье"
StringGrid1.Cells[r,s]:=FormatDateTime(' mmmm', DateTimePicker1.Date);

А чем суббота хуже от выходного?

Jekasea · 18.12.2013, 05:06

Хуже тем, что в суботу и воскресенье надо работать, а выходной он и в африке выходной.
Спасибо всем я разобрался.

17.12.2013, 22:42	#1
Jekasea Пользователь Регистрация: 03.05.2013 Сообщений: 47	цветной текст в StringGrid1 Как в StringGrid1 вывести текст, что-бы только надписи "субота" , "воскресенье" и "выходной" были красным цветом. ПРИМЕЧАНИЕ***: В процессе выполнения моей программы эти надписи могут появиться в любой ячейке StringGrid1.

17.12.2013, 22:48	#2
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Закрашивай в событии OnDrawCell: http://www.programmersforum.ru/showthread.php?t=8416 http://www.programmersforum.ru/showthread.php?t=88806 I'm learning to live...

17.12.2013, 23:26	#4
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Ну и прекрасно ) Анализируй ячейку, и если она содержит слово нужное: Код: `if TStringGrid(Sender).Cells[Arow,Acol]='выходной'...` закрашивай. I'm learning to live...

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Цветной текст в Edit	SolovejK	Общие вопросы Delphi	16	04.10.2013 22:34
[C] цветной текст	Dioklet	Общие вопросы C/C++	3	04.08.2013 11:13
цветной текст (от новичка)	skvor83	Microsoft Office Excel	1	11.02.2010 17:29
Цветной текст RichEdit	KoBRaAndrey	Общие вопросы Delphi	17	13.12.2009 17:52
Цветной текст	ERASERROR	Общие вопросы Delphi	4	25.01.2008 21:04

17.12.2013, 23:11	#3
Jekasea Пользователь Регистрация: 03.05.2013 Сообщений: 47	"субота" и "воскресенье" у меня выводится из DateTimePicker1: StringGrid1.Cells[r,s]:=FormatDateTime(' mmmm', DateTimePicker1.Date); "выходной" из массива: var week: array[1..4] of string; ---------------- week[1]:=' 8'; week[2]:=' выходной'; week[3]:=' 12'; week[4]:=' 4';

17.12.2013, 23:47	#5
Jekasea Пользователь Регистрация: 03.05.2013 Сообщений: 47	с "выходной" - понял как сделать, а как быть с "субота" и "воскресенье" StringGrid1.Cells[r,s]:=FormatDateTime(' mmmm', DateTimePicker1.Date);

18.12.2013, 05:06	#7
Jekasea Пользователь Регистрация: 03.05.2013 Сообщений: 47	Хуже тем, что в суботу и воскресенье надо работать, а выходной он и в африке выходной. Спасибо всем я разобрался.