From 9944d63b2ae3a67d34669b4b14231baacdedcb37 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Mon, 22 Nov 2010 00:00:18 +0000
Subject: [PATCH] Converter: use an hourglass cursor when waiting for thread.

git-svn-id: trunk@28382 -
---
 converter/convertdelphi.pas | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/converter/convertdelphi.pas b/converter/convertdelphi.pas
index 5a29105229..d342ae1ca6 100644
--- a/converter/convertdelphi.pas
+++ b/converter/convertdelphi.pas
@@ -967,7 +967,12 @@ begin
   try
     CacheUnitsThread.Resume;
     Result:=fSettings.RunForm;      // Get settings from user.
-    CacheUnitsThread.WaitFor;       // Make sure the thread has finished.
+    Screen.Cursor:=crHourGlass;
+    try
+      CacheUnitsThread.WaitFor;     // Make sure the thread has finished.
+    finally
+      Screen.Cursor:=crDefault;
+    end;
     if Result=mrOK then begin
       // create/open lazarus project or package file
       fLazPFilename:=fSettings.DelphiToLazFilename(fOrigPFilename, fLazPSuffix, false);