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

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

Динамическая разработка шаблонов серверных элементов управления [D2005, WinXP]


Середкин ©   (2005-07-26 17:36:00) 

Есть необходимость динамически менять шаблоны серверных элементов управления компонента DataList, например, ItemTemplate. Для этого необходимо перекрыть метод InstantiateIn пространства имён ITemplate. В помощи Delphi 2005 имеются примеры такого перекрытия:

[Visual Basic]
' Override the ITemplate.InstantiateIn method to ensure
' that the templates are created in a Literal control and
' that the Literal object's DataBinding event is associated
' with the BindData method.
Public Sub InstantiateIn(container As Control) Implements ITemplate.InstantiateIn
  Dim l As New Literal()
  AddHandler l.DataBinding, AddressOf Me.BindData
  container.Controls.Add(l)
End Sub 'InstantiateIn
[C#]
// Override the ITemplate.InstantiateIn method to ensure
// that the templates are created in a Literal control and
// that the Literal object's DataBinding event is associated
// with the BindData method.
public void InstantiateIn(Control container)
{
   Literal l = new Literal();
   l.DataBinding += new EventHandler(this.BindData);
   container.Controls.Add(l);
}
[C++]
// Override the ITemplate*.InstantiateIn method to ensure
// that the templates are created in a Literal control and
// that the Literal Object*'s DataBinding event is associated
// with the BindData method.
public:
void InstantiateIn(Control* container) {
  Literal* l = new Literal();
  l->DataBinding += new EventHandler(this, BindData);
  container->Controls->Add(l);
}

Но меня интересует именно сиснтаксис DelphiLanguage. Может кто-нибудь перевести это на нормальный "дельфёвый" вид?


k2   (2005-07-27 08:19:00) [1]

а вообще хорошо в ..\Demos\DB\AspPortal\BDSWebExample\Code\apptypes.pas и проч.
всегда сначала вдаль тянет отчегото :)


k2   (2005-07-27 06:24:00) [2]

Середкин   (26.07.05 17:36)

подробно здесь http://bdn.borland.com/borcon2004/article/paper/0,1963,32154,00.html


Наверх

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