Как добраться до TDataLink

← →
Rule © (2004-12-09 17:52) [0]

нашел пример где есть такоей код
DBGrid1.Datalink.ActiveRecird ...

но вот вопрос в том что класс TDatalink он в принципе то присутствует в гриде но когда писать вот так как я привел выше, то ругается, как добраться до этого класса дбгрида ?
спасибо
зы:а вообще это все надо чтобы сделать "полосатый дбгрид", подключенный к серверным СУБД ...

← →
Rule © (2004-12-09 17:59) [1]

оп, извините, под вечер дуплю, это приват поле, поэтому надо писать наследника ....
извиняюсь за глупый вопрос

← →
Johnmen © (2004-12-09 22:01) [2]

http://delphi.olympus.ru/dk/helloword/dbGridPlus.htm

← →
jack128 © (2004-12-09 22:02) [3]

Rule © (09.12.04 17:59) [1]
под вечер дуплю, это приват поле, поэтому надо писать наследника
вечер еще не кончился ;-))

← →
Rule © (2004-12-10 14:10) [4]

jack128 © (09.12.04 22:02) [3]
ну извини, выразился не так ... главное что я понля :)

← →
Rule © (2004-12-10 14:10) [5]

Johnmen © (09.12.04 22:01) [2]
сам почти также сделал :)

← →
Rule © (2004-12-10 14:50) [6]

Johnmen © (09.12.04 22:01) [2]
кстати в статье ошибка :)

← →
Johnmen © (2004-12-10 15:13) [7]

>Rule © (10.12.04 14:50) [6]
>кстати в статье ошибка :)

Я не читал, но какая ?

Johnmen © (10.12.04 15:13) [7]

там написано
В процедуре OnDrawColumnCell делаем следующую проверку:

IF TFriendGrid(Sender).DataLink.ActiveRecord and 1 <> 0
Then TDBGrid(Sender).Canvas.Brush.Color:=RGB($CC,$CC,$99)

ну вот этого недостаточно ... потомучто надо ж ещё прорисовать ячейку
типа добавить в конце ещё:
TDBGrid(Sender).DefaultDrawColumnCell(Rect,DataCol,Column,State);
иначе толку от нашего браша то не будет :)

Johnmen © (10.12.04 16:21) [9]
ну так это тебе понятно, и слава богу мне, но есть же начинающие программисты ... вот им непонятно :)

Как добраться до TDataLink Найти похожие ветки