Здравствуйте, Khimik, Вы писали:

K>type
K>TVect=record
K>x,y,z:double;
K>function VectRad:double;//Длина вектора
K>function VectRad2:double;//Квадрат длины
K>function IsNil:boolean;//Равен ли нулю
K>function MinVect:tvect;//Поменять все знаки
K>end;

С некоторых пор меня стали сильно удивлять такие имена переменных, функций и классов, для которых нужно тут же писать объясняющий комментарий.
Кто такой VectRad? При чем тут радианы, если речь о длине? Или речь о какой-то радости? MinVect, судя по названию, должен возвращать какой-то минимизированный вектор

Почему бы не сделать так, например:

TVector = record
  x, y, z: Double;
  function GetLength: Double;
  function GetSquareLength: Double;
  function IsZeroLength: Boolean;
  function InvertAllSigns: TVector;
end;

И выглядит каноничненько и комментарии тут сто лет не нужны

Лучше дать хорошее имя и не экономить на его длине (никакого смысла в такой экономии давно нет), чем через пару месяцев расшифровывать свои же собственные сокращения.