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

пользовательский класс >>перегрузка базовых процедур   Найти похожие ветки 

← →
dolphin   (2004-11-30 05:21) [0]

ув мастера вот трабл
чочу создать свой класс на основе Tstringgrid(а)*TMygrid = class (TStringGrid)*
он должен создавать обэкти со своими настройками например при создани
grid:=Tmygrid.Create(self);
grid.Parent:=form1;
чтоб появлялся не стандартный grid а мой fixedcols которого равен нулю
(ответы типа
grid:=Tmygrid.Create(self);
grid.Parent:=form1;
grid.fixedcols:=0  //не писать это по тупому :) )
мне нужно ятак понял при создании grid(a) переопределить процедуру SetFixedCols(Value: Integer);
но как ??? :(
в кострукторе пробовал задать значения при создание так дельфя таким матом ругается
просьба подскажите что делать
буду очень благодарен если кинете источник литературы на подобную тему (создании своего обьекта с своими свойствами и прцедурами исходя из базовых классов)

---

← →
KSergey ©   (2004-11-30 06:33) [1]

А код конструктора с руганью посмотреть можно? Вообще-то, если я все верно понимаю, там это как раз указать и нужно, SetFixedCols тут ни при  чем.
И обязательно тогда добавить

published
...
   property FixedCols: Integer default 0;
...

Иначе в dfm не сохранится верная настройка.

---

← →
KSergey ©   (2004-11-30 06:34) [2]

> [1] KSergey ©   (30.11.04 06:33)
> И обязательно тогда добавить

Читать:
Обязательно кроме поправки в конструкторе добавить

---

← →
Defunct ©   (2004-11-30 07:17) [3]

> в кострукторе пробовал задать значения при создание так дельфя таким матом ругается

Конструктор правильно перегрузил? Inherited конструктор вызвал?

---

← →
dolphin   (2004-12-01 03:10) [4]

что куда вписывать
мне нужно то всего эту пропертю FixedCols
перезаписать  чтобы сразу созданый обьект уже имел ее
как перезаписать пропертю ???
пожалуста подробней
:(

> И обязательно тогда добавить
>
> published
> ...
>    property FixedCols: Integer default 0;
> ...
>
> Иначе в dfm не сохранится верная настройка.

---

← →
Дмитрий В. Белькевич   (2004-12-01 03:28) [5]

>в кострукторе пробовал задать значения при создание так дельфя таким матом ругается

Каким таким? Чё пишет хоть? И вообще, код переписанного конструктора приведи.

---

← →
dolphin   (2004-12-01 04:13) [6]

огромное извенение за даный тупизм и скрытость проблемы я уже  понял  в чем проблема то (вотправильный код:
constructor t.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
 fixedcols:=0;
end;  )
:))

---

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

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



Память: 0.46 MB
Время: 0.039 c