Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.12.26;
Скачать: [xml.tar.bz2];

Вниз

Прорисовка StringGrid   Найти похожие ветки 

 
DimonNew   (2004-12-07 18:47) [0]

Привет, подскажите пож-та. Прорисовываю ячейку в StringGrid - при определенном условии цвет шрифта меняю на красный, и в результате: если прорисовка в области видимости таблицы в окне, то все нормально, а если ячейка не видна, то в ней портиться текст. Вывожу следующим способом:
StrCell:=strgrRemain.CellRect(ACol,ARow);
StringGrid.Canvas.Font.Color:=clRed;
StringGrid.Canvas.Brush.Color:=clMenu;
DrawText(StringGrid.Canvas.Handle,PChar(StringGrid.Cells[ACol,ARow]),Length(StringGrid.Cells[ACol,ARow]),StrCell,Flag);< /CODE>

Что можно сделать, подскажите пож-та.


 
DimonNew   (2004-12-07 18:48) [1]

strgrRemain - StringGrid (опечатка)


 
novice_man ©   (2004-12-07 19:08) [2]

DrawText(StringGrid.Canvas.Handle,PChar(StringGrid.Cells[ACol,ARow]),Length(StringGrid.Cells[ACol,ARow]),StrCell,Flag )

Может так?

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
 Rect: TRect; State: TGridDrawState);
begin
......
StringGrid1.Canvas.TextRect(Rect, Rect.Left + 1, Rect.Top + 2, StringGrid1.Cells[ACol, ARow]);
......
end;


 
novice_man ©   (2004-12-07 19:12) [3]

И, что значит:
а если ячейка не видна, то в ней портиться текст.
Как ты знаешь что портится?


 
DimonNew   (2004-12-08 10:32) [4]

Я имею в виду, когда прокручиваю скролом таблицу, та ячейка, в которой я меняю цвет шрифта, и портиться.


 
DimonNew   (2004-12-08 10:36) [5]

novice_man © - Спасибо большое!!! Заработало через TextRect.



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

Форум: "Основная";
Текущий архив: 2004.12.26;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.036 c
8-1096419202
ZDimitriy
2004-09-29 04:53
2004.12.26
Подскажите как преобразовать Hbitmap в Tbitmap


11-1084435973
dimon1979
2004-05-13 12:12
2004.12.26
KOL-компоненты и тип PControl


1-1102695692
Dema-X
2004-12-10 19:21
2004.12.26
из dynamic Child зделать nill


3-1101157374
serko
2004-11-23 00:02
2004.12.26
Печать DbEhlib


4-1099994934
Aleksandr.
2004-11-09 13:08
2004.12.26
Как по хуку клавиатуры получить русские буквы?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский