Skip to content

Commit 0ffe53b

Browse files
authored
Merge pull request #73 from Embarcadero/fix
Fixing comment and typos
2 parents cef7271 + bbbb157 commit 0ffe53b

File tree

1 file changed

+5
-5
lines changed

1 file changed

+5
-5
lines changed

Source/WrapDelphi.pas

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -961,7 +961,7 @@ TPyDelphiWrapper = class(TEngineClient, IFreeNotificationSubscriber)
961961
// Note the the interface must be compiled in {$M+} mode and have a guid
962962
// Usage: WrapInterface(TValue.From(YourInterfaceReference))
963963
// 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
965965
// that will keep the interface alive as long as python has a
966966
// reference to it.
967967
function WrapInterface(const IValue: TValue; const ACopy: boolean = false): PPyObject;
@@ -3341,8 +3341,8 @@ procedure TPyRttiObject.SetValueAndType(const AValue: TValue;
33413341

33423342
function TPyPascalRecord.GetValue: TValue;
33433343
begin
3344-
if Assigned(fCopy) then
3345-
Result := fCopy^
3344+
if Assigned(FCopy) then
3345+
Result := FCopy^
33463346
else
33473347
TValue.Make(fAddr, RttiType.Handle, Result);
33483348
end;
@@ -3358,8 +3358,8 @@ class procedure TPyPascalRecord.SetupType(PythonType: TPythonType);
33583358

33593359
function TPyPascalInterface.GetValue: TValue;
33603360
begin
3361-
if Assigned(fCopy) then
3362-
Result := fCopy^
3361+
if Assigned(FCopy) then
3362+
Result := FCopy^
33633363
else
33643364
TValue.Make(@fAddr, RttiType.Handle, Result);
33653365
end;

0 commit comments

Comments
 (0)