var a,b,c: Vector; begin a.SetIt(false,[1,2,3,4]); // a = [1,2,3, 4] //magnitude b.SetIt(false,[1,0,1,-1]); // b = [1,0,1,-1] /phase c.PolarToCart(a,b); // result stored in c = projections to Re and Im axis end;