I don't know if it's related to the fact that TEdit.CaretPos.X (or Y) is read 
only, or as Mattias said, the with syntax cannot work with record anyway... :-)

This should be a problem (if any) with lazarus not fpc.

Shannon

在 三, 1月 9, 2013 at 8:27 下午,Andreas Schneider <ak...@gmx.de> 写道:
Interesting. IIRC that worked correctly in Delphi 2010 (it's been a while ...). 
This might be a bug in FPC.

The root of the problem is how properties are handled. Afaics however, the use 
of with should cause it to assign the final record afterwards. Apparently it 
doesn't - at least not always. Could be by design, could be a bug. I'll check 
the bug tracker later and may report that. (You can do that yourself, if you 
want, but sooner or later I would like that functionality to work too, so I've 
a personal interest in this and therefore would not mind to report it :-))

Greetings,
Andreas


On 09.01.2013 13:19, xrfang wrote:
Hi Adreas,

I just tried, your method did not work as expected.  It compiled ok, but didn't 
put the cursor at the end of the line as I wanted.  However, assign CaretPos a 
new TPoint worked.

Regards,

在 三, 1月 9, 2013 at 4:47 下午,Andreas Schneider <ak...@gmx.de> 写道:
Hi,

you could also use the with-statement, that is pretty handy in such cases:

with Edit1.CaretPos do
begin
  X := 0;
  Y := 0;
end;
Best Regards,
Andreas


On 08.01.2013 16:30, xrfang wrote:
Hi, 

Is there "record literal in FPC? e.g. normally, you do:

var
   cp : TPoint;

cp.X := 0;
cp.Y := 0;
Edit1.CaretPos := cp;

I would like to use literal directly, such as:

Edit1.CaretPos := (X: 0, Y: 0); 

But the above syntax is wrong. Is there such thing exists?

Thanks,
Shannon


--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus




--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to