Add(Button,7869739,140,126)
{
 Left=50
 Top=35
 Width=65
 Data=String(ьцдЯ)
 link(onClick,16490913:doEvent1,[])
}
Add(Edit,7688838,238,126)
{
 Left=140
 Top=25
 Width=95
 Font=[Courier New,8,0,0,204]
}
Add(Edit,4976770,238,168)
{
 Left=140
 Top=55
 Width=95
 Font=[Courier New,8,0,0,238]
}
Add(Hub,16490913,189,126)
{
 link(onEvent1,7688838:doText,[])
 link(onEvent2,4976770:doText,[(221,139)(221,174)])
}

#pas
//[DefFont VARIABLE]
var    // New TFont instances are intialized with the values in this structure:
  DefFont: TGDIFont = (
     Height: 0;
     Width: 0;
     Escapement: 0;
     Orientation: 0;
     Weight: 0;
     Italic: FALSE;
     Underline: FALSE;
     StrikeOut: FALSE;
     CharSet: 1;
     OutPrecision: 0;
     ClipPrecision: 0;
     Quality: fqDefault;
     Pitch: fpDefault;
     Name: 'MS Sans Serif';
  );

#pas
//[DefFont VARIABLE]
var    // New TFont instances are intialized with the values in this structure:
  DefFont: TGDIFont = (
     Height: 0;
     Width: 0;
     Escapement: 0;
     Orientation: 0;
     Weight: 0;
     Italic: FALSE;
     Underline: FALSE;
     StrikeOut: FALSE;
     CharSet: 1;
     OutPrecision: 0;
     ClipPrecision: 0;
     Quality: fqDefault;
     Pitch: fpDefault;
     {$IFDEF UNICODE_CTRLS}
     Name: ( 'T', 'a', 'h', 'o', 'm', 'a',
             #0, #0, #0, #0, #0, #0, #0, #0, #0, #0, #0, #0, #0, #0, #0, #0, #0,
             #0, #0, #0, #0, #0, #0, #0, #0, #0 );
     {$ELSE}
     Name: 'System';
     {$ENDIF}
  );