Как изменить цвет отрисовки, допустим, линий у stringGrid?

[TwiX]

Т.е. что не изменяется в свойствах, а присутствует только в классе?

Подозреваю, надо унаследовать класс и переписать функцию overrid'ом.
Но т.к. ни разу не работал с ООП делфи, не могу реализовать. Поэтому и начал изучать, спроив тут.

2. Как создать свой класс? Как я понял, обязательно должен присутствовать конструктор и деструктор.

Желательно в примерах)

Спасибо.

[TwiX]

Пожалуста) Через три часа в Москву навсегда без инета уюезжаю) Я должен это узнать)

[postal2]

Знаю, что 3 часа уже давно прошли, но вот грязный хак - чуть переделан класс TCustomGrid в т.ч. добавлено свойство LineColor, которое определяет цвет линий. Компонент может быть глючный, писал на коленке. Может пригодится кому.
Пример использования

  
uses
  GrigsEX;

var
  fv: TStringGridEX;
begin
  fv := TStringGridEX.Create(nil);
  fv.Parent := Form1;
  fv.Top := 100;
  fv.GridLineWidth := 5;
  fv.FixedCols := 0;
  fv.FixedRows := 0;
  fv.LineColor := clGreen;
  fv.Visible := True;
end;

[denisbrain]

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

Знаю, что 3 часа уже давно прошли, но вот грязный хак - чуть переделан класс TCustomGrid в т.ч. добавлено свойство LineColor, которое определяет цвет линий. Компонент может быть глючный, писал на коленке. Может пригодится кому.
Пример использования

  
uses
  GrigsEX;

var
  fv: TStringGridEX;
begin
  fv := TStringGridEX.Create(nil);
  fv.Parent := Form1;
  fv.Top := 100;
  fv.GridLineWidth := 5;
  fv.FixedCols := 0;
  fv.FixedRows := 0;
  fv.LineColor := clGreen;
  fv.Visible := True;
end;

круто через 3 года ответили )))
а StringGrid

DefaultDrawing = False // стандартная отрисовку выключить
OnDrawCell = StringGrid1DrawCell // свою процедуру отрисовки написать

не про pascal/delphi

ФДС-3 общежития
Москва, Ломоносовский просп. 31, корп. 3
телефон: (499) 1475535