Solved

TObject.Destroy

Posted on 2000-04-10
7
204 Views
Last Modified: 2010-04-04
Is anybody out there willing to let me have the source code for TObject.Destroy from Delphi 3?

There might be a question about copyright infringement, but I don't know how valid it is about an outdated product. All I need is that one method.
0
Comment
Question by:HorridMan
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 3
7 Comments
 
LVL 6

Expert Comment

by:DrDelphi
ID: 2702840
Well, Delphi 3 is hardly obsolete... maybe not as used as other, newer versions, but not quite a relic yet. <g> As for the copyright infringements... I doubt that there would be any considering Borland ships its source with the Client/Server versions of Delphi. Now how much this is going to men to you when you see the destructor, welllll.....




TObject.Destroy
begin
end;


Of course there is the TObject.Free method which contains some assembler code...


procedure TObject.Free;
asm
        TEST    EAX,EAX
        JE      @@exit
        MOV     ECX,[EAX]
        MOV     DL,1
        CALL    dword ptr [ECX].vmtDestroy
@@exit:
end;



Good luck!!
0
 
LVL 20

Expert Comment

by:Madshi
ID: 2703045
In D5 (don't know about D3 right now) there are the methods CleanupInstance and FreeInstance. Both methods must not be called directly. Instead they are called automatically after all (overwritten) destructors have been executed.
0
 

Author Comment

by:HorridMan
ID: 2714036
This question has a deletion request Pending
0
What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

 

Author Comment

by:HorridMan
ID: 2714046
This question is perhaps not justifiable, and has not received a serious answer.
0
 
LVL 6

Expert Comment

by:DrDelphi
ID: 2714544
This question no longer is pending deletion
0
 
LVL 6

Accepted Solution

by:
DrDelphi earned 20 total points
ID: 2714545
"This question is perhaps not justifiable, and has not received a serious answer."....

Poppycock! The question has recieved not one, but two serious answers. Methinks that the points were never meant to be awarded. Truly a Horrid Man!

 
0
 

Author Comment

by:HorridMan
ID: 2718671
Let's have a contest to see who's most horrid!
0

Featured Post

VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Have you ever had your Delphi form/application just hanging while waiting for data to load? This is the article to read if you want to learn some things about adding threads for data loading in the background. First, I'll setup a general applica…
In my programming career I have only very rarely run into situations where operator overloading would be of any use in my work.  Normally those situations involved math with either overly large numbers (hundreds of thousands of digits or accuracy re…
In this brief tutorial Pawel from AdRem Software explains how you can quickly find out which services are running on your network, or what are the IP addresses of servers responsible for each service. Software used is freeware NetCrunch Tools (https…
Sometimes it takes a new vantage point, apart from our everyday security practices, to truly see our Active Directory (AD) vulnerabilities. We get used to implementing the same techniques and checking the same areas for a breach. This pattern can re…
Suggested Courses
Course of the Month9 days, 3 hours left to enroll

615 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question