KB
Size: a a a
KB
VA
KB
VA
AM
AI
AM
AI
RB
VA
VA
СП
RB
z
property PowerTrans: Integer read FPowerTrans write FPowerTrans;
property SteelType: String read FSteelType write FSteelType;
property Frequency: Integer read FFrequency write FFrequency;
property LegDiameter: Integer read FLegDiameter write FLegDiameter;
property DiameterDimension: Integer read FDiameterDimension write FDiameterDimension;
property StackNumber: Integer read FStackNumber write FStackNumber;
property PlateStepNumber: Integer read FPlateStepNumber write FPlateStepNumber;
property StepNumber: Integer read FStepNumber write FStepNumber;
property HoleLegDiameter: Integer read FHoleLegDiameter write FHoleLegDiameter;
property HoleYokeDiameter: Integer read FHoleYokeDiameter write FHoleYokeDiameter;
property HoleLegNumber: Integer read FHoleLegNumber write FHoleLegNumber;
property HoleYokeNumber: Integer read FHoleYokeNumber write FHoleYokeNumber;
property SigmaLeg: Integer read FSigmaLeg write FSigmaLeg;
property SigmaYoke: Integer read FSigmaYoke write FSigmaYoke;
property HalfOverlap: Integer read FHalfOverlap write FHalfOverlap;
property PlateGap: Extended read FPlateGap write FPlateGap;
property WindowHeight: Integer read FWindowHeight write FWindowHeight;
property LegDimension: Integer read FLegDimension write FLegDimension;
property VoltagePh: Extended read FVoltagePh write FVoltagePh;
property TurnNumber: Integer read FTurnNumber write FTurnNumber;
property B1: Integer read FB1 write FB1;
property KZAP: Extended read FKZAP write FKZAP;
property SMM: Extended read FSMM write FSMM;
property KGMM3: Extended read FKGMM3 write FKGMM3;
property StackWidth: TIList read FStackWidth write FStackWidth;
property PlateNumber: TIList read FPlateNumber write FPlateNumber;
СП
z
СП
VA
RS
.gitignore
в корень. Так как в коде много лишнего. Можешь оттолкнуться от этого во вложении, подредактировав под себя.KB