Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

В Delphi 6 перестально работать DefaultDrawColumnCell. Почему???


werr ©   (2006-03-06 12:58:00) 

Перешел с Delphi 5 на 6
Перестал работать кусок кода:
procedure TForm3.DBGridEh1DrawColumnCell(Sender: TObject;
 const Rect: TRect; DataCol: Integer; Column: TColumnEh;
 State: TGridDrawState);
begin
if DBGridEh1.Fields[0].AsBoolean = true
then DBGridEh1.Canvas.Font.Color := clRed;
DBGridEh1.DefaultDrawColumnCell(Rect,DataCol,Column,State);
[Error] : Incompatible types
Ругается на строку DBGridEh1.DefaultDrawColumnCell(Rect,DataCol,Column,State);
на State
В Хелпе есть пример что так можно делать
TGridDrawState в Grids.pas есть

DBGridEh1.DefaultDrawColumnCell(Rect,DataCol,Column, gdSelected); тоже не работает:
[Error] Incompatible types: 'TGridDrawState' and 'Enumeration'

Не пойму что не так?
Переставлять Delphi?

p.s. на компьютере установлено еще и Delphi 2005. Delphi 5 стоял когда еще на было установлено 2005. Может дело в этом? Типы подцепляются из 2005-ого?


werr   (2006-03-06 14:29:00) [1]

а почему DBGridEh1.DefaultDrawColumnCell(Rect,DataCol,Column,State); не работает?


Anatoly Podgoretsky   (2006-03-06 13:27:00) [2]

gdSelected - это множество, а не ординал.


Наверх

Титульная страница Поиск, карта сайта Написать письмо