1 2 3 4 5 6 7 8 9 10 | (* !!! This code must not be subject to change !!! *) hInst := SUPER^.prvAllocInstMem(eError => eError); Create := SUPER^.prvGetInstPointer(hInst); IF Create <> 0 AND eError = FBF.ERROR.NO_ERROR THEN {implicit on} Create^.__vfInit(); Create^.FB_Init(TRUE, FALSE); {implicit off} xOk := __QUERYINTERFACE(Create^, itfInst); IF xOk THEN |