Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Подскажите, плз, как правильно к своему TCustomControl прицепить

Страницы: 1 2 >
ProgRAMmer Dimonych © (2006-12-05 22:52:00)
TControlScrollBar. Выдаёт Access Violation.

В перекрытом Create'е создаю, в Destroy'е - уничтожаю.

Чего-то явно не хватает в Create'е. Чего?

ProgRAMmer Dimonych (2006-12-08 23:34:00) [1]
> Leonid Troyanovsky © (08.12.06 23:30) [22]
By the way, TScrollingWinControl is not a descedant of TCustomControl...

Well, thanks to everyone for your help. I hope, I'll finally solve the problem now...

Leonid Troyanovsky (2006-12-08 23:30:00) [2]

> ProgRAMmer Dimonych © (08.12.06 23:20) [21]

> Я, если честно, с самого начала не хотел его юзать, т.к.
> там Canvas'а нет. А добавлять

Canvas is a protected property that is usually redeclared as public in descendants of TCustomControl.

--
Regards, LVT.

ProgRAMmer Dimonych (2006-12-08 23:20:00) [3]
> Leonid Troyanovsky © (08.12.06 23:13) [20]
Я, если честно, с самого начала не хотел его юзать, т.к. там Canvas'а нет. А добавлять Canvas - ещё одна головная боль. Придётся, наверное, всё-таки прорисовать скролл-бары самому :(

Leonid Troyanovsky (2006-12-08 23:13:00) [4]

> ProgRAMmer Dimonych © (08.12.06 22:54) [19]

> А как тогда, если не через TControlScrollBar? Не хочется

Откуда нам знать?
Да хучь, чрез TScrollingWinControl.

--
Regards, LVT.

ProgRAMmer Dimonych (2006-12-08 22:54:00) [5]
> Leonid Troyanovsky © (08.12.06 22:41) [18]
А как тогда, если не через TControlScrollBar? Не хочется самому прорисовывать...

Leonid Troyanovsky (2006-12-08 22:41:00) [6]

> ProgRAMmer Dimonych © (08.12.06 22:18) [17]

> не сработает, т.к. у TControlScrollBar метод Create объявлен
> в разделе private. :(

Видимо, это какой-то частный метод.
Бо, конструкторы публичны, IMHO.

Да, и какое отношение это имеет к твоим проблемам,
достаточно удаленным, так сказать, от оного модуля.

--
Regards, LVT.
Regards, LVT,

ProgRAMmer Dimonych (2006-12-08 22:18:00) [7]
> Loginov Dmitry © (08.12.06 22:10) [16]
Вскидка не поможет. Я посмотрел исходник: даже так, как это делается в TScrollingWinControl (т.е. Create(Self,sbHorizontal)) не сработает, т.к. у TControlScrollBar метод Create объявлен в разделе private. :(

Loginov Dmitry (2006-12-08 22:10:00) [8]
> Чего делать-то?

На вскидку - создать их с помощью TControlScrollBar.Create( Self);

ProgRAMmer Dimonych (2006-12-08 19:30:00) [9]
Ага, а теперь прикол: в Object Inspector'е скролл-бары появляются, но их свойства недоступны. Чего делать-то?

Loginov Dmitry (2006-12-06 16:45:00) [10]
Конечно же это была шутка :))))))))))))))))

ProgRAMmer Dimonych (2006-12-06 16:37:00) [11]
> Anatoly Podgoretsky © (06.12.06 16:27) [11]
LOL

> Loginov Dmitry © (06.12.06 16:30) [12]
LOL, но только при условии, что это не всерьёз, а как продолжение [11]

Loginov Dmitry (2006-12-06 16:30:00) [12]
И вообще

Anatoly Podgoretsky (2006-12-06 16:27:00) [13]
> ProgRAMmer Dimonych (06.12.2006 16:25:10) [10]

И до тоже

ProgRAMmer Dimonych (2006-12-06 16:25:00) [14]
> MBo © (06.12.06 16:20) [8]
Ни себе фига! Типа просто объявить как свойство и всё?

P.S. Мда, надо завязывать с программированием по вечерам после учебного дня... :(

novill (2006-12-06 16:24:00) [15]
> [8] MBo © (06.12.06 16:20)

интересно там написано, но как-то же тогда пользоваться?

MBo (2006-12-06 16:20:00) [16]
А что написано в хелпе по TControlScrollBar.Create?

ProgRAMmer Dimonych (2006-12-06 16:16:00) [17]
P.S. Кроме названия контрола и скролл-баров...

ProgRAMmer Dimonych (2006-12-06 16:16:00) [18]
> Loginov Dmitry © (06.12.06 16:13) [5]
Точная копия кода в Delphi-юните.

Loginov Dmitry (2006-12-06 16:13:00) [19]
Код прямо тут набивал?

ProgRAMmer Dimonych (2006-12-06 15:59:00) [20]
Цитирую TMyControl.Create;

constructor TMyControl.Create(AOwner:TComponent);
begin
{Создание и обновление всего, что нужно для контрола, это было до попытки добавить TControlScrollBar}
FMyHorizontalScrollBar:=TControlScrollBar.Create;
FMyVerticalScrollBar:=TControlScrollBar.Create;
end;

destructor TMyControl.Destroy;
begin
FMyHorizontalScrollBar.Free;
FMyVerticalScrollBar.Free;
{и ещё много всякой мути, не имеющей абсолютно никакого отношения к ScrollBar'ам}
end;

Это пока всё...

Страницы: 1 2 >

Наверх

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