Hello code dz. Indeed, strange things append. After creating a new project with a single form an a button, assigning button1.onexec method generate strange code:
unit main; ... type tmainfo = class(tmainform) tbutton1: tbutton; procedure onexec($self: Pointer; const sender: TObject); end; ... implementation ... procedure tmainfo.onexec($self: Pointer; const sender: TObject); begin close; end; end. _____________________________________________ See procedure onexec: ----> what is that "$self: Pointer" ? Fre;D
_______________________________________________ mseide-msegui-talk mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
