Точка с вещественными коодинатами
type TDoublePoint = record x: Double; y: Double; end;
@value координата по горизонтали @value координата по вертикали