call - back - klasse, de demonstratie van het gebruik van een van de voorbeelden van de als een call - back -.,, als je wilt dat een ramen call - back - noemen. Een voorbeeld van een klasse, van de klasse in plaats van alleen met je tmyclass tmyclass.mycallback en methoden, en de naam.,,,,, tcallbackthunk = verpakking van dossiers, popedx: bytes;, bytes, moveax:;,, selfptr: aanwijzing van pusheax:;,,,, pushedx bytes;: bytes;,,,, jmpoffset gevolgd: bytes;:.;,,,,, aan het einde van tcallbackthunk; var, de call - back -:;,,,,,, callback.popedx: erfenis gecreëerd; = 5 dollar.,, callback.moveax:= $B8;,,,, callback.selfptr:= zelf; callback.pusheax:= $50, 52 dollar callback.pushedx:=;,,,,,,,, callba callback.jmp:= E9;Ck.jmpoffset:= integer (@tmyclass.mycallback) bedragen (@callback.jmp) - 5;,,, ///////winapi hier noemen, via de call back - procedure "call - back - in, bijvoorbeeld, enumsystemlocales (tfnlocaleenumproc (@ call - back -), lcid_supported); aan het einde van,,,;