Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!sdd.hp.com!spool.mu.edu!news.nd.edu!mentor.cc.purdue.edu!j.cc.purdue.edu!brazil.psych.purdue.edu!zhou
From: zhou@brazil.psych.purdue.edu (Albert Zhou)
Newsgroups: comp.lang.pascal
Subject: Overwrite TApplication.Init?
Message-ID: <11841@j.cc.purdue.edu>
Date: 11 Apr 91 20:32:51 GMT
Article-I.D.: j.11841
Sender: news@j.cc.purdue.edu
Reply-To: zhou@brazil.psych.purdue.edu (Albert Zhou)
Organization: Purdue University
Lines: 21

It seems that overwriting TApplication.Init is very hazardous.
 I have tried to overwrite it in order to get a different background. 
Here is the code:

procedure mine.init; virtual;
begin
	Tapplication.init;
	write a different background;
end;

Odd enough, this modification caused the system to be rebooted.

Out of curiosity, I tried the following code:

procedure mine.init; virtual;
begin
	Tapplication.init;
end;

This should not have changed anything. But this time, the system 
simply got stuck.