Avatar

Please consider registering
guest

sp_LogInOut Log In sp_Registration Register

Register | Lost password?
Advanced Search

— Forum Scope —




— Match —





— Forum Options —





Minimum search word length is 3 characters - maximum search word length is 84 characters

sp_Feed Topic RSS sp_TopicIcon
C++ copy operator of TPsVar (and derived classes)
August 24, 2016
12:26, EEST
Avatar
Fransua33
Member
Members
Forum Posts: 39
Member Since:
October 27, 2014
sp_UserOfflineSmall Offline

Hi,

Just a doubt with the C++ copy operator. Is it correct to use it?

For example if I want to create the same object in a different piece of memory like this:

TPsBool tag = new TPsBool(NULL);
tag->OnChange = onChangeRoutine;
TPsBool tag2 = new TPsBool(NULL);
*tag2 = *tag;

And this piece of code results in 2 TPsBool objects with differents pointers and the same properties, methods and events. Is that right?

Best regards!!!

August 24, 2016
13:57, EEST
Avatar
Jouni Aro
Moderator
Moderators
Forum Posts: 1026
Member Since:
December 21, 2011
sp_UserOfflineSmall Offline

Must admit that I haven’t used C++ enough to say for sure, but I don’t think this works as expected.

The Delphi classes have the Assign() method, instead, which you can use to make a deep copy of the objects – also in C++.

August 25, 2016
17:19, EEST
Avatar
Fransua33
Member
Members
Forum Posts: 39
Member Since:
October 27, 2014
sp_UserOfflineSmall Offline

So the correct code must be:

TPsBool tag = new TPsBool(NULL);
tag->OnChange = onChangeRoutine;
TPsBool tag2 = new TPsBool(NULL);
tag2->Assign(tag);

Does Assign copies also the events configured in the source?

August 26, 2016
10:03, EEST
Avatar
Jouni Aro
Moderator
Moderators
Forum Posts: 1026
Member Since:
December 21, 2011
sp_UserOfflineSmall Offline

No, it only copies the “Variable Properties”. This is the full implementation:

procedure TPsVar.Assign(Source: TPersistent);
begin
if Source is TPsVar then
CopyProps([vpValue..vpOther2], TPsVar(Source))
else
inherited Assign(Source);
end;
Forum Timezone: Europe/Helsinki

Most Users Ever Online: 1919

Currently Online:
100 Guest(s)

Currently Browsing this Page:
1 Guest(s)

Top Posters:

Heikki Tahvanainen: 402

hbrackel: 144

rocket science: 88

pramanj: 86

Francesco Zambon: 83

Ibrahim: 78

Sabari: 62

kapsl: 57

gjevremovic: 49

Xavier: 43

Member Stats:

Guest Posters: 0

Members: 749

Moderators: 7

Admins: 1

Forum Stats:

Groups: 3

Forums: 15

Topics: 1529

Posts: 6471

Newest Members:

scvchad954, misty3446453365, KelsonzFu, Kelsonz, lienbelisario, erick34s63346, Kaitlyntvsl, lonaerskine7, KTP21ideft, Georgecotag

Moderators: Jouni Aro: 1026, Pyry: 1, Petri: 0, Bjarne Boström: 1032, Jimmy Ni: 26, Matti Siponen: 349, Lusetti: 0

Administrators: admin: 1