Add(MainForm,2953706,98,161)
{
 Width=421
 Height=341
 Position=1
 link(onCreate,3035930:doSet,[])
}
Add(TabControl,6792858,133,91)
{
 Left=20
 Top=25
 Width=330
 Height=210
 Align=5
 Tabs=#1:1|1:2|1:3|
 Point(PHandle)
}
Add(InlineCode,3035930,189,175)
{
 WorkPoints=#5:doSet|
 DataPoints=#31:PHandle=Указатель на TabControl|2:p1|2:p2|2:p3|
 Code=#20:// autor andrestudio|15:unit HiAsmUnit;|0:|9:interface|0:|29:uses kol,Windows,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|33:     PHandle,p1,p2,p3: THI_Event;|47:     procedure doSet(var dt: TData; idx: word);|5: end;|0:|14:implementation|0:|28:procedure THiAsmClass.doSet;|4:var |18:  P,src: PControl;|5:begin|36:  // получаем сам контроллер страниц|31:  P := ReadControl(PHandle,'');|65:  // бордюр и его величина на любителя (может где и не сработает)|18:  P.Margin := 10; |2:  |22:  // первый контейнер |28:  src := ReadControl(p1,'');|62:  SetParent(src.Handle,P.Children[0].Handle); // индексы с "0"|24:  src.Align := caClient;|22:  // второй контейнер |28:  src := ReadControl(p2,'');|45:  SetParent(src.Handle,P.Children[1].Handle);|26:  src.Align := caClient;  |22:  // третий контейнер |29:  src := ReadControl(p3,''); |45:  SetParent(src.Handle,P.Children[2].Handle);|27:  src.Align := caClient;   |4:end;|0:|4:end.|
 link(PHandle,6792858:PHandle,[(195,156)(146,156)])
 link(p1,2099869:Var,[])
 link(p2,12457687:Var,[])
 link(p3,14084509:Var,[])
}
Add(ChildPanel,6399527,399,126)
{
}
BEGIN_SDK
  Add(EditMulti,3983474,21,21)
  {
   VarCount=1
   link(Var1,1521274:PHandle,[(27,179)(41,179)])
  }
  Add(Panel,1521274,35,105)
  {
   Left=35
   Top=-2000
   Color=12639424
   Caption="Test"
   Alignment=2
   Point(PHandle)
  }
END_SDK
Add(Memo,8114909,518,119)
{
 Left=530
 Top=-2000
 Point(PHandle)
}
Add(LineBreak,5638909,399,182)
{
 Caption="p1"
 Type=1
 link(Data,6399527:Var1,[])
 Primary=[2099869,-203,-42]
}
Add(LineBreak,10832006,455,182)
{
 Caption="p2"
 Type=1
 link(Data,3303134:PHandle,[])
 Primary=[12457687,-252,-70]
}
Add(LineBreak,14031784,539,182)
{
 Caption="p3"
 Type=1
 link(Data,8114909:PHandle,[])
 Primary=[14084509,-329,-98]
}
Add(ChildPanelRush,3303134,455,126)
{
}
BEGIN_SDK
  Add(EditMultiEx,10108010,21,21)
  {
   VarCount=#7:PHandle|
   link(PHandle,16110098:PHandle,[(27,179)(41,179)])
  }
  Add(PanelRush,16110098,35,105)
  {
   Left=35
   Top=-2000
   Width=279
   Height=192
   Glyphs=[]
   Point(PHandle)
  }
  Add(ButtonRush,10660206,28,28)
  {
   Left=15
   Top=15
   Width=80
   Height=60
   Glyphs=[]
  }
  Add(ButtonRush,7277346,166,92)
  {
   Left=110
   Top=15
   Width=80
   Height=60
   Glyphs=[]
  }
END_SDK
Add(InfoTip,5893149,350,28)
{
 Info=#86:Чтобы на поле к примеру детишки не мешали делаем Top к примеру -2000 и улетят вверх :)|
 Font=[MS Sans Serif,10,1,255,1]
 Width=260
 Height=214
}