How to "kill" a program 1

[svanels]

Enough being said about how to launch a program from a delphi application.
What about, terminating a program and doing the necessary clean-up (the program doesn't receive control).

Regards

Steven

 

[gcaramia]

If you refer to: "kill an external process",
here you can found solution:

http://www.swissdelphicenter.ch/torry/showcode.php?id=266

if you refer to: "close all forms of your application":

For an SDI applications:

for i := application.ComponentCount - 1 downto 0 do
begin
if application.components[i] is TForm then
(application.components[i] as TForm).close;
end;

For an MDI application:

for i := MainForm.MDIChildCount - 1 downto 0 do
MainForm.MDIChildren[i].close;

You can close your application with 'Application.Terminate' but, from Delphi Help:

"If the application itself terminates (for example, by calling the Terminate method of the Application object), all forms close without receiving an OnClose event."

Hope this help you
Giovanni Caramia

 

[svanels]

Thanks Giovanni! It is 'kill an external process', the link did it.

Steven