Add(Button,10256021,168,84)
{
 Left=50
 Top=45
 Data=String(My Caption)
 link(onClick,3041093:doHelloWorld,[])
}
Add(InlineCode,3041093,238,84)
{
 WorkPoints=#12:doHelloWorld|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|69:uses kol,Share,Debug,Windows; // add "Windows" unit for "MessageBox" |0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|3:   |9:   public|67:     procedure doHelloWorld(var dt:TData; idx:word); // declaration|0:|5: end;|0:|14:implementation|0:|49:procedure THiAsmClass.doHelloWorld; // definition|5:begin|66:  MessageBox(0,PChar('Hello, World !'),PChar(ToString(dt)),MB_OK);|4:end;|0:|4:end.|
}