Скачать: CL | DM;

Свой компонент Grid, наследуемый от TStringGrid   Найти похожие ветки 

← →
Арсен   (2007-11-18 19:53) [0]

всем привет.
мне постоянно нужны некоторые значения которые высчитываються по размерам ячеек в stringgrid или например нужно чтобы  было новое свойство(или старое) rowcount, которое возращало бы значение меньшн на 1,но при этом кол-во строк оставалось прежним. . Решил сделать компонент где были бы функции которые возвращали мне эти значения.

делаю так
unit supergrid;

interface

uses
Classes, Controls, ExtCtrls, Messages, Grids;

type
TSuperGrid = class(TStringGrid)
function new_row_count:Integer;
end;
var
 grid:TStringGrid;

procedure Register;

implementation

function TSuperGrid.new_row_count:integer;
begin
 result := grid.RowCount-1;
end;

procedure Register;
begin
RegisterComponents("Standard", [TSuperGrid]);
end;

 initialization
   grid :=TStringGrid.Create(self);

   finalization
     grid.Free;

end.

не работает, что здесь не так?

---

← →
Юрий Зотов ©   (2007-11-18 20:24) [1]

А зачем здесь еще какой-то grid? Одного Super разве мало?

---

← →
boa_kaa ©   (2007-11-18 20:59) [2]

> что здесь не так?

Здесь все не так!
Goto: http://www.delphimaster.ru/cgi-bin/forum.pl?n=12
и смотрим ссылку на книгу

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.018 c