@@ -356,7 +356,7 @@ TPyDelphiWrapper = class;
356
356
357
357
TMyClass = class(TInterfacedObject, IFreeNotification)
358
358
private
359
- fFreeNotifImpl : TFreeNotificationImpl ;
359
+ fFreeNotifImpl : IFreeNotification ;
360
360
protected
361
361
property FreeNotifImpl : IFreeNotification read fFreeNotifImpl implements IFreeNotification;
362
362
public
@@ -738,9 +738,9 @@ TRegisteredUnits = class
738
738
739
739
{
740
740
The main component of this unit.
741
- Method TObjectToPyObject wraps Delphi objects into Python objects
742
- Method RegisterDelphiClass can be used to extend its functionality.
743
- Method RegisterEventHandler can be used to add event handling functionality
741
+ Method Wrap wraps Delphi objects into Python objects
742
+ Method RegisterDelphiWrapper can be used to extend its functionality.
743
+ Method EventHandlers.RegisterHandler can be used to add event handling functionality
744
744
}
745
745
{ $IF not Defined(FPC) and (CompilerVersion >= 23)}
746
746
[ComponentPlatformsAttribute(pidWin32 or pidWin64)]
@@ -2951,7 +2951,7 @@ function TPyDelphiWrapper.Wrap(AObj: TObject;
2951
2951
if Index >= 0 then break;
2952
2952
DelphiClass := DelphiClass.ClassParent;
2953
2953
end ;
2954
- Assert(Index >= 0 , ' Internal Error in PyDelphiWrapper.TObjectToPyObject ' ); // shouldn't happen
2954
+ Assert(Index >= 0 , ' Internal Error in PyDelphiWrapper.Wrap ' ); // shouldn't happen
2955
2955
2956
2956
Result := TRegisteredClass(fClassRegister[Index]).PythonType.CreateInstance;
2957
2957
with PythonToDelphi(Result) as TPyDelphiObject do begin
0 commit comments