[Lazarus] record literal in FPC?

[xrfang]

Thanks, but what I want is to AVOID any kind of declarations. So I will use the Point() function suggested by ik.

在 三, 1月 9, 2013 at 12:26 上午，Howard Page-Clark <hdpc at talktalk.net> 写道：
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; 
.. 


-- 
_______________________________________________ 
Lazarus mailing list 
Lazarus at lists.lazarus.freepascal.org 
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20130108/26267c74/attachment-0003.html>