From ff2928349233ea01fbaed5645ba7da7431d5f73e Mon Sep 17 00:00:00 2001
From: mterwoord_cp <7cd3fd84a0151ea055c2f79e4d2eef9576fe9afesxUZAwxD>
Date: Fri, 13 Aug 2010 18:46:07 +0000
Subject: [PATCH]

---
 Setup2/Events.inc | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 Setup2/Events.inc

diff --git a/Setup2/Events.inc b/Setup2/Events.inc
new file mode 100644
index 000000000..60a2dac2f
--- /dev/null
+++ b/Setup2/Events.inc
@@ -0,0 +1,13 @@
+[Code]
+
+procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
+var
+	xResultCode: Integer;
+begin
+
+	Exec(ExpandConstant('{code:VSNET2008_PATH|}\devenv.exe'), '/setup', '', SW_HIDE, ewWaitUntilTerminated, xResultCode);
+	if xResultCode <> 0 then
+	begin
+		RaiseException('An error occurred while unregistering with Visual Studio!');
+	end;	
+end;
\ No newline at end of file