function editdemo_aspx.get_AutoHandlers: Integer; begin Result := ASP.editdemo_aspx___autoHandlers; end; function editdemo_aspx.get_ApplicationInstance: System.Web.HttpApplication; begin Result := Self.Context.ApplicationInstance as System.Web.HttpApplication; end; function editdemo_aspx.get_TemplateSourceDirectory: System.String; begin Result := '/vslive'; end; procedure editdemo_aspx.set_AutoHandlers(Value: Integer); begin ASP.editdemo_aspx___autoHandlers := Value; end; function editdemo_aspx.__BuildControlEdit1: System.Web.UI.Control; var __ctrl: System.Web.UI.WebControls.TextBox; begin __ctrl := System.Web.UI.WebControls.TextBox.Create; Self.Edit1 := __ctrl; __ctrl.ID := 'Edit1'; __ctrl.Width := System.Web.UI.WebControls.Unit.Parse('300px', System.Globalization.CultureInfo.InvariantCulture); Result := __ctrl; end; function editdemo_aspx.__BuildControl__control3: System.Web.UI.Control; var __ctrl: System.Web.UI.WebControls.Button; begin __ctrl := System.Web.UI.WebControls.Button.Create; Self.__control3 := __ctrl; __ctrl.Text := 'Click Me!'; __ctrl.add_Click(Self.ButtonClick); Result := __ctrl; end; function editdemo_aspx.__BuildControl__control2: System.Web.UI.Control; var __parser: System.Web.UI.IParserAccessor; __ctrl: System.Web.UI.HtmlControls.HtmlForm; begin __ctrl := System.Web.UI.HtmlControls.HtmlForm.Create; Self.__control2 := __ctrl; __parser := __ctrl as System.Web.UI.IParserAccessor; __parser.AddParsedSubObject(System.Web.UI.LiteralControl.Create(''#13#10' ')); Self.__BuildControlEdit1; __parser.AddParsedSubObject(Self.Edit1); __parser.AddParsedSubObject(System.Web.UI.LiteralControl.Create(''#13#10' ')); Self.__BuildControl__control3; __parser.AddParsedSubObject(Self.__control3); __parser.AddParsedSubObject(System.Web.UI.LiteralControl.Create(''#13#10' ')); Result := __ctrl; end; function editdemo_aspx.__BuildControlMessage: System.Web.UI.Control; var __ctrl: System.Web.UI.WebControls.Label; begin __ctrl := System.Web.UI.WebControls.Label.Create; Self.Message := __ctrl; __ctrl.ID := 'Message'; Result := __ctrl; end; |