Skip to content

Commit

Permalink
Apply JCF and clear line-endings
Browse files Browse the repository at this point in the history
  • Loading branch information
PMeira committed Feb 14, 2022
1 parent 70266ba commit d1c168b
Show file tree
Hide file tree
Showing 207 changed files with 149,745 additions and 134,607 deletions.
636 changes: 335 additions & 301 deletions Source/CMD/CmdForms.pas

Large diffs are not rendered by default.

75 changes: 37 additions & 38 deletions Source/CMD/MyDSSClassDefs.pas
Original file line number Diff line number Diff line change
@@ -1,50 +1,49 @@
unit MyDSSClassDefs;
unit MyDSSClassDefs;

{
----------------------------------------------------------
Copyright (c) 2008-2021, Electric Power Research Institute, Inc.
All rights reserved.
----------------------------------------------------------
}
}
{
Prototype unit for creating custom version of DSS
}

interface


CONST

MYCLASS_ELEMENT_CONST = 99 * 8; // make unique constants for your classes
// SEE DSSClassDefs.pas
}

interface


const

MYCLASS_ELEMENT_CONST = 99 * 8; // make unique constants for your classes
// SEE DSSClassDefs.pas
{Assign (typically by adding) this constant to DSSClassType when objects of
your custom class are instantiated. See Tline.Create in Line.Pas, for example}

Procedure CreateMyDSSClasses; // Called in DSSClassDefs

implementation

Uses
DSSClass
{Add Special Uses clauses here: }
{,MyDSSClass}
;


Procedure CreateMyDSSClasses;

Begin
{Put your custom class instantiations here}

your custom class are instantiated. See Tline.Create in Line.Pas, for example}

procedure CreateMyDSSClasses; // Called in DSSClassDefs

implementation

uses
DSSClass
{Add Special Uses clauses here: }
{,MyDSSClass};

procedure CreateMyDSSClasses;

begin
{Put your custom class instantiations here}

{ Example:
DSSClasses.New := TMyDSSClass.Create;
}

End;

initialization

finalization

end.
}

end;

initialization

finalization

end.
Loading

0 comments on commit d1c168b

Please sign in to comment.