Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

пользовательский класс >>перегрузка базовых процедур [D7, WinXP]


dolphin ©   (2004-11-30 05:21:00) 

ув мастера вот трабл
чочу создать свой класс на основе 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);
но как ??? :(
в кострукторе пробовал задать значения при создание так дельфя таким матом ругается
просьба подскажите что делать
буду очень благодарен если кинете источник литературы на подобную тему (создании своего обьекта с своими свойствами и прцедурами исходя из базовых классов)


dolphin   (2004-12-01 04:13:00) [1]

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


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

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

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


dolphin   (2004-12-01 03:10:00) [3]

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

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


Defunct   (2004-11-30 07:17:00) [4]

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

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


KSergey   (2004-11-30 06:34:00) [5]

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

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


KSergey   (2004-11-30 06:33:00) [6]

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

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


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


Наверх

Титульная страница Поиск, карта сайта Написать письмо