Показать сообщение отдельно
  #2  
Старый 25.07.2011, 19:27
Аватар для Viajero
Viajero Viajero вне форума
Активный
 
Регистрация: 14.06.2011
Адрес: РБ
Сообщения: 214
Версия Delphi: Delphi 7 FB 2.5
Репутация: 5849
По умолчанию

Этих свойств нету у TDBGrid, но есть у TCustomGrid (они protected и можно их вытащить в классе-наследнике).
Можно попробовать это:
Код:
{

Код улучшенного TDBGrid, имеющего свойства Col,

Row и Canvas и метод CellRect. Это чрезвычайно

полезно в случае, если вы, к примеру, хотите

получить выпадающий список на месте редактируемой

пользователем ячейки.

}

 

unit VUBComps;

 

interface

 

uses

 

SysUtils, WinTypes, WinProcs, Messages, Classes, Graphics, Controls,

Forms, Dialogs, Grids, DBGrids, DB, Menus;

 

type

 

TDBGridVUB = class(TDBGrid)

private

   { Private declarations }

protected

   { Protected declarations }

public

   property Canvas;

   function CellRect(ACol, ARow: Longint): TRect;

   property Col;

   property Row;

 

   procedure Register;

 

implementation

 

procedure Register;

begin

 

RegisterComponents('VUBudget', [TDBGridVUB]);

end;

 

function TDBGridVUB.CellRect(ACol, ARow: Longint): TRect;

begin

 

Result := inherited CellRect(ACol, ARow);

end;

 

end.
 

 

 

 

©Drkb::03050

       

Взято с http://delphiworld.narod.ru
Можно также попробовать найти и установить компоненты EhLib, там есть очень навороченный TDBGridEh с нужными свойствами.
__________________
- Товарищ прапорщик!!! Остановите поезд!!! - Поезд СТОЙ! РАЗ! ДВА!
Ответить с цитированием