Sure. I've created a new form to demonstrate:<br><br>unit Unit1;<br><br>{$mode objfpc}{$H+}<br><br>interface<br><br>uses<br> Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,<br> StdCtrls;<br>
<br>type<br><br> { TForm1 }<br><br> TForm1 = class(TForm)<br> Button1: TButton;<br> procedure Button1Click(Sender: TObject);<br> private<br> { private declarations }<br> public<br> { public declarations }<br>
end;<br><br>var<br> Form1: TForm1;<br><br>operator ** (b1: byte; b2: byte): integer;<br><br>implementation<br><br> operator**(b1: byte; b2: byte): integer;<br> var i : Integer;<br> begin<br> Result:=1;<br> for i:=1 to b2 do<br>
Result:=Result*b1;<br> end;<br><br>{ TForm1 }<br><br>procedure TForm1.Button1Click(Sender: TObject);<br>var<br> i: integer;<br> b1, b2: byte;<br>begin<br> b1 := 10;<br> b2 := 3;<br> i := b1 ** b2;<br> ShowMessage(IntToStr(i));<br>
end;<br><br>initialization<br> {$I unit1.lrs}<br><br>end.<br><br>The code is OK, and compiles 100%.<div><br>When I command Ctrl-D, I get this from JCF:<br><br><a href="http://picasaweb.google.com/lh/photo/_ixt2_gM792PLJ9-ISZ4uw?feat=directlink">http://picasaweb.google.com/lh/photo/_ixt2_gM792PLJ9-ISZ4uw?feat=directlink</a><div>
<img src="http://lh5.ggpht.com/_Jc0YbzYpc-8/S3qiOmY0j_I/AAAAAAAACWQ/NC4BEGmplPY/jcf.png" alt="jcf.png" title="jcf.png"><br><br>2010/2/15 Paul Ishenin <<a href="mailto:ip@kmiac.ru">ip@kmiac.ru</a>>:<br>> 16.02.2010 3:02, Guionardo Furlan wrote:<br>
>><br>>> Well, I see another problem:<br>>><br>>> jcf doesn't recognize operator overloading.<br>><br>> Actually, this was implemented. Can you give an example of code which is not<br>> recognized?<br>
><br>> Best regards,<br>> Paul Ishenin.<br>><br>><br>> --<br>> _______________________________________________<br>> Lazarus mailing list<br>> <a href="mailto:Lazarus@lists.lazarus.freepascal.org">Lazarus@lists.lazarus.freepascal.org</a><br>
> <a href="http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus">http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus</a><br>><br><br><br><br>-- <br>Timeo hominem unius libri<br>Cogito ergo sum - Carpe diem<br>
<br>[]s<br>Guionardo Furlan<br><a href="http://guionardo.blogspot.com">http://guionardo.blogspot.com</a><br><a href="http://www.guionardofurlan.com.br">http://www.guionardofurlan.com.br</a><br><br></div></div>