On 08/1/13 3:30, xrfang wrote: > I would like to use literal directly, such as: > > Edit1.CaretPos := (X: 0, Y: 0); You can use a typed constant thus: const Origin: TPoint = (x:0; y:0); begin ... Edit1.CaretPos := Origin; ...