home *** CD-ROM | disk | FTP | other *** search
/ PC Pro 2005 June (DVD) / DPPRO0605DVD.iso / Install / program files / Borland / BDS / 3.0 / Objrepos / DelphiDotNet / UserControlTemplate.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  2004-10-22  |  1.7 KB  |  77 lines
  1. unit [!UnitName];
  2.  
  3. interface
  4.  
  5. uses
  6.   System.Drawing, System.Collections, System.ComponentModel,
  7.   System.Windows.Forms, System.Data;
  8.  
  9. type
  10.   T[!ClassName] = class([!AncestorName])
  11.   {$REGION 'Designer Managed Code'}
  12.   strict private
  13.     /// <summary>
  14.     /// Required designer variable.
  15.     /// </summary>
  16.     Components: System.ComponentModel.Container;
  17.     /// <summary>
  18.     /// Required method for Designer support - do not modify
  19.     /// the contents of this method with the code editor.
  20.     /// </summary>
  21.     procedure InitializeComponent;
  22.   {$ENDREGION}
  23.   strict protected
  24.     /// <summary>
  25.     /// Clean up any resources being used.
  26.     /// </summary>
  27.     procedure Dispose(Disposing: Boolean); override;
  28.   private
  29.     { Private Declarations }
  30.   public
  31.     constructor Create;
  32.   end;
  33.  
  34.   [assembly: RuntimeRequiredAttribute(TypeOf(T[!ClassName]))]
  35.  
  36. implementation
  37.  
  38. uses
  39.   System.Globalization;
  40.  
  41. {$AUTOBOX ON}
  42.  
  43. {$REGION 'Windows Form Designer generated code'}
  44. /// <summary>
  45. /// Required method for Designer support -- do not modify
  46. /// the contents of this method with the code editor.
  47. /// </summary>
  48. procedure T[!ClassName].InitializeComponent;
  49. begin
  50.   Self.Components := System.ComponentModel.Container.Create;
  51. end;
  52. {$ENDREGION}
  53.  
  54. constructor T[!ClassName].Create;
  55. begin
  56.   inherited Create;
  57.   //
  58.   // Required for Windows Form Designer support
  59.   //
  60.   InitializeComponent;
  61.   //
  62.   // TODO: Add any constructor code after InitializeComponent call
  63.   //
  64. end;
  65.  
  66. procedure T[!ClassName].Dispose(Disposing: Boolean);
  67. begin
  68.   if Disposing then
  69.   begin
  70.     if Components <> nil then
  71.       Components.Dispose();
  72.   end;
  73.   inherited Dispose(Disposing);
  74. end;
  75.  
  76. end.
  77.