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

Вниз

Можно ли разукрашивать StringGrid в событии отличном от DrawCell?   Найти похожие ветки 

 
Германн ©   (2007-12-07 21:54) [40]


> А что такое "бр." ? )
>

Догадайся с трех раз :)
Или сам попробуй вызвать Invalidate в OnDrawCell.


 
{RASkov} ©   (2007-12-07 22:01) [41]

> [40] Германн ©   (07.12.07 21:54)
> Или сам попробуй вызвать Invalidate в OnDrawCell.

Легко:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);
begin
 StringGrid1.Canvas.Brush.Color:=clRed;
 StringGrid1.Canvas.TextRect(Rect,Rect.Left, Rect.Top, "бр.бр.бр.бр.");
 StringGrid1.Invalidate;
end;

:)
У меня это "бр." выглядит как мелькающие полоски по всему гриду)
но грид читаем и как указано - красный.....
Ладно.... я в шутку спросил впрочем как и этот пост....
:о)


 
Германн ©   (2007-12-07 22:05) [42]


> У меня это "бр." выглядит как мелькающие полоски по всему
> гриду)
> но грид читаем и как указано - красный.....
>

А ты добавь кроме грида еще что-нибудь. Кнопочки например. Тогда и увидишь последствия бесконечной рекурсии :)


 
{RASkov} ©   (2007-12-07 22:18) [43]

> [42] Германн ©   (07.12.07 22:05)

Ага.... понял что есть бр :)
Но у меня и в этом случае все тип-топ :)
Во:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);
begin
 StringGrid1.Canvas.Brush.Color:=clRed;
 StringGrid1.Canvas.TextRect(Rect,Rect.Left, Rect.Top, "бр.бр.бр.бр.");
 StringGrid1.Invalidate;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 ShowMessage("бр");
end;

procedure TForm1.Edit1Change(Sender: TObject);
begin
 Label1.Caption:=Edit1.Text;
end;

end.

Кнопочки тыкаются, сообщения показываются, текст метки меняется..... а в это время по гриду полоски бегаютЪ
Анамалия :)


 
Германн ©   (2007-12-08 02:18) [44]


> {RASkov} ©   (07.12.07 22:18) [43]
>
> > [42] Германн ©   (07.12.07 22:05)
>
> Ага.... понял что есть бр :)
> Но у меня и в этом случае все тип-топ :)


 
Германн ©   (2007-12-08 02:21) [45]


> Германн ©   (08.12.07 02:18) [44]
>
>
> > {RASkov} ©   (07.12.07 22:18) [43]
> >
> > > [42] Германн ©   (07.12.07 22:05)
> >
> > Ага.... понял что есть бр :)
> > Но у меня и в этом случае все тип-топ :)
>

Тогда попробуй сначала кинуть на форму кнопочки и другие компоненты, а потом StringGrid.


 
{RASkov} ©   (2007-12-08 11:49) [46]

> [45] Германн ©   (08.12.07 02:21)

:(
:)
Пострадал из набора (Грид, метка, кнопка, эдит) только эдит, остальные после первой полной перерисовки(свернуть-развернуть окно) нормолизовались
Ну все, Сергей, нужно завязывать с этими экспериментами......)

Одно скажу.... для автора вопроса и не только - Ни в коем случае не вызывайте Invalidate в OnDrawCell грида
это ужасно (
:о)


 
Германн ©   (2007-12-08 13:51) [47]


> Ну все, Сергей, нужно завязывать с этими экспериментами.
> .....)

Да я уже давно завязал :)


 
{RASkov} ©   (2007-12-08 14:04) [48]

> [47] Германн ©   (08.12.07 13:51)
> Да я уже давно завязал :)

А меня подталкивал на них.... не чесно :)


 
Германн ©   (2007-12-08 14:57) [49]


> А меня подталкивал на них.... не чесно :)

Ты сам напросился {RASkov} ©   (07.12.07 14:53) [34]
:)


 
{RASkov} ©   (2007-12-08 15:24) [50]

> [49] Германн ©   (08.12.07 14:57)
>
> > А меня подталкивал на них.... не чесно :)
>
> Ты сам напросился {RASkov} ©   (07.12.07 14:53) [34]
> :)

Я никуда не напрашивался :( Я просто поинтересовался у автора - не сделал-ли он глупость
:)



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

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

Наверх




Память: 0.53 MB
Время: 0.005 c
2-1197226685
alikon1
2007-12-09 21:58
2008.01.06
Работа с конкретной строкой в DBGrid


3-1188654911
-novice-
2007-09-01 17:55
2008.01.06
индексы в связанных таблицах


2-1197293148
deras
2007-12-10 16:25
2008.01.06
Помогите с запросом


2-1197278553
malyar
2007-12-10 12:22
2008.01.06
stringgrid какая яцейка находится под курсором мыши


2-1197356647
dumka
2007-12-11 10:04
2008.01.06
Строки





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский