classcode.inc

delphi框架

  ClassCode =
    'unit %ModuleIdent;                                        ' + #10#13 +
    '                                                          ' + #10#13 +
    '// This code was generated by the EasyMVC OTA Wizard      ' + #10#13 +
    '// www.eazisoft.com                                       ' + #10#13 +
    '                                                          ' + #10#13 +
    'interface                                                 ' + #10#13 +
    'uses                                                      ' + #10#13 +
    '  Windows, Messages, SysUtils, Variants, Classes,         ' + #10#13 +
    '  Graphics, Controls, Forms;                              ' + #10#13 +
    '                                                          ' + #10#13 +
    'type                                                      ' + #10#13 +
    '  T%FormIdent = class(T%AncestorIdent)                    ' + #10#13 +
    '  private                                                 ' + #10#13 +
    '    { Private declarations }                              ' + #10#13 +
    '  public                                                  ' + #10#13 +
    '    { Public declarations }                               ' + #10#13 +
    '  end;                                                    ' + #10#13 +
    '                                                          ' + #10#13 +
    'var                                                       ' + #10#13 +
    '  %FormIdent: T%FormIdent;                                ' + #10#13 +
    '                                                          ' + #10#13 +
    'implementation                                            ' + #10#13 +
    '                                                          ' + #10#13 +
    '{$R *.dfm}                                                ' + #10#13 +
    '                                                          ' + #10#13 +
    'end.                                                      ' + #10#13;