File tree Expand file tree Collapse file tree 1 file changed +5
-5
lines changed Expand file tree Collapse file tree 1 file changed +5
-5
lines changed Original file line number Diff line number Diff line change @@ -961,7 +961,7 @@ TPyDelphiWrapper = class(TEngineClient, IFreeNotificationSubscriber)
961
961
// Note the the interface must be compiled in {$M+} mode and have a guid
962
962
// Usage: WrapInterface(TValue.From(YourInterfaceReference))
963
963
// Warning: WrapInterface represents a weak (uncounted) reference!
964
- // Use WrapInterfaceCopy to retrieve a normal counted reference
964
+ // Use ACopy = True to retrieve a normal counted reference
965
965
// that will keep the interface alive as long as python has a
966
966
// reference to it.
967
967
function WrapInterface (const IValue: TValue; const ACopy: boolean = false): PPyObject;
@@ -3341,8 +3341,8 @@ procedure TPyRttiObject.SetValueAndType(const AValue: TValue;
3341
3341
3342
3342
function TPyPascalRecord.GetValue : TValue;
3343
3343
begin
3344
- if Assigned(fCopy ) then
3345
- Result := fCopy ^
3344
+ if Assigned(FCopy ) then
3345
+ Result := FCopy ^
3346
3346
else
3347
3347
TValue.Make(fAddr, RttiType.Handle, Result);
3348
3348
end ;
@@ -3358,8 +3358,8 @@ class procedure TPyPascalRecord.SetupType(PythonType: TPythonType);
3358
3358
3359
3359
function TPyPascalInterface.GetValue : TValue;
3360
3360
begin
3361
- if Assigned(fCopy ) then
3362
- Result := fCopy ^
3361
+ if Assigned(FCopy ) then
3362
+ Result := FCopy ^
3363
3363
else
3364
3364
TValue.Make(@fAddr, RttiType.Handle, Result);
3365
3365
end ;
You can’t perform that action at this time.
0 commit comments