forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix, the address taken was a stack one, not the object heap's one

This commit is contained in:
Basile Burg 2015-01-04 22:31:02 +01:00
parent 691d282d34
commit 826c591548
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/ce_common.pas
View File

@ -556,7 +556,7 @@ end;
function uniqueObjStr(const aObject: Tobject): string; function uniqueObjStr(const aObject: Tobject): string;
begin begin
{$HINTS OFF}{$WARNINGS OFF} {$HINTS OFF}{$WARNINGS OFF}
exit( format('%.8X',[NativeUint(@aObject)])); exit( format('%.8X',[NativeUint(aObject)]));
{$HINTS ON}{$WARNINGS ON} {$HINTS ON}{$WARNINGS ON}
end; end;