Open users permission management bug fix

	modified:   TurboBird.lpi
	modified:   main.pas
	modified:   querywindow.pas

TurboBird.lpi

@@ -74,10 +74,11 @@
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
         <UnitName Value="main"/>
+        <IsVisibleTab Value="True"/>
         <EditorIndex Value="4"/>
         <WindowIndex Value="0"/>
-        <TopLine Value="3"/>
-        <CursorPos X="17" Y="21"/>
+        <TopLine Value="110"/>
+        <CursorPos X="5" Y="127"/>
         <UsageCount Value="200"/>
         <Loaded Value="True"/>
         <LoadedDesigner Value="True"/>
@@ -124,8 +125,8 @@
         <UnitName Value="QueryWindow"/>
         <EditorIndex Value="0"/>
         <WindowIndex Value="0"/>
-        <TopLine Value="940"/>
-        <CursorPos X="1" Y="950"/>
+        <TopLine Value="1169"/>
+        <CursorPos X="13" Y="1175"/>
         <UsageCount Value="200"/>
         <Bookmarks Count="2">
           <Item0 X="3" Y="1128" ID="0"/>
@@ -243,10 +244,9 @@
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
         <UnitName Value="About"/>
-        <IsVisibleTab Value="True"/>
         <EditorIndex Value="2"/>
         <WindowIndex Value="0"/>
-        <TopLine Value="2"/>
+        <TopLine Value="14"/>
         <CursorPos X="17" Y="18"/>
         <UsageCount Value="200"/>
         <Loaded Value="True"/>
@@ -1141,123 +1141,123 @@
     <JumpHistory Count="30" HistoryIndex="29">
       <Position1>
         <Filename Value="querywindow.pas"/>
-        <Caret Line="1255" Column="15" TopLine="1243"/>
+        <Caret Line="905" Column="3" TopLine="903"/>
       </Position1>
       <Position2>
-        <Filename Value="querywindow.pas"/>
-        <Caret Line="1256" Column="15" TopLine="1244"/>
+        <Filename Value="main.pas"/>
+        <Caret Line="12" Column="1" TopLine="1"/>
       </Position2>
       <Position3>
-        <Filename Value="querywindow.pas"/>
-        <Caret Line="905" Column="3" TopLine="902"/>
+        <Filename Value="main.pas"/>
+        <Caret Line="3814" Column="18" TopLine="3806"/>
       </Position3>
       <Position4>
-        <Filename Value="querywindow.pas"/>
-        <Caret Line="1154" Column="22" TopLine="1140"/>
+        <Filename Value="main.pas"/>
+        <Caret Line="3829" Column="1" TopLine="3807"/>
       </Position4>
       <Position5>
-        <Filename Value="querywindow.pas"/>
-        <Caret Line="1409" Column="1" TopLine="1381"/>
+        <Filename Value="main.pas"/>
+        <Caret Line="3736" Column="13" TopLine="3729"/>
       </Position5>
       <Position6>
         <Filename Value="querywindow.pas"/>
-        <Caret Line="905" Column="3" TopLine="903"/>
+        <Caret Line="175" Column="41" TopLine="158"/>
       </Position6>
       <Position7>
         <Filename Value="main.pas"/>
-        <Caret Line="12" Column="1" TopLine="1"/>
+        <Caret Line="261" Column="57" TopLine="242"/>
       </Position7>
       <Position8>
-        <Filename Value="main.pas"/>
-        <Caret Line="3814" Column="18" TopLine="3806"/>
+        <Filename Value="querywindow.pas"/>
+        <Caret Line="950" Column="1" TopLine="940"/>
       </Position8>
       <Position9>
-        <Filename Value="main.pas"/>
-        <Caret Line="3829" Column="1" TopLine="3807"/>
+        <Filename Value="scriptdb.pas"/>
+        <Caret Line="451" Column="45" TopLine="433"/>
       </Position9>
       <Position10>
         <Filename Value="main.pas"/>
-        <Caret Line="3736" Column="13" TopLine="3729"/>
+        <Caret Line="754" Column="3" TopLine="750"/>
       </Position10>
       <Position11>
-        <Filename Value="querywindow.pas"/>
-        <Caret Line="175" Column="41" TopLine="158"/>
+        <Filename Value="main.pas"/>
+        <Caret Line="1" Column="1" TopLine="1"/>
       </Position11>
       <Position12>
         <Filename Value="main.pas"/>
-        <Caret Line="261" Column="57" TopLine="242"/>
+        <Caret Line="69" Column="11" TopLine="41"/>
       </Position12>
       <Position13>
-        <Filename Value="querywindow.pas"/>
-        <Caret Line="950" Column="1" TopLine="940"/>
+        <Filename Value="main.pas"/>
+        <Caret Line="146" Column="21" TopLine="118"/>
       </Position13>
       <Position14>
-        <Filename Value="scriptdb.pas"/>
-        <Caret Line="451" Column="45" TopLine="433"/>
+        <Filename Value="main.pas"/>
+        <Caret Line="478" Column="25" TopLine="450"/>
       </Position14>
       <Position15>
         <Filename Value="main.pas"/>
-        <Caret Line="754" Column="3" TopLine="750"/>
+        <Caret Line="755" Column="18" TopLine="727"/>
       </Position15>
       <Position16>
         <Filename Value="main.pas"/>
-        <Caret Line="1" Column="1" TopLine="1"/>
+        <Caret Line="756" Column="18" TopLine="728"/>
       </Position16>
       <Position17>
         <Filename Value="main.pas"/>
-        <Caret Line="69" Column="11" TopLine="41"/>
+        <Caret Line="757" Column="18" TopLine="729"/>
       </Position17>
       <Position18>
-        <Filename Value="main.pas"/>
-        <Caret Line="146" Column="21" TopLine="118"/>
+        <Filename Value="systables.pas"/>
+        <Caret Line="309" Column="3" TopLine="298"/>
       </Position18>
       <Position19>
-        <Filename Value="main.pas"/>
-        <Caret Line="478" Column="25" TopLine="450"/>
+        <Filename Value="systables.pas"/>
+        <Caret Line="87" Column="1" TopLine="54"/>
       </Position19>
       <Position20>
         <Filename Value="main.pas"/>
-        <Caret Line="755" Column="18" TopLine="727"/>
+        <Caret Line="4218" Column="1" TopLine="4184"/>
       </Position20>
       <Position21>
-        <Filename Value="main.pas"/>
-        <Caret Line="756" Column="18" TopLine="728"/>
+        <Filename Value="systables.pas"/>
+        <Caret Line="103" Column="3" TopLine="101"/>
       </Position21>
       <Position22>
-        <Filename Value="main.pas"/>
-        <Caret Line="757" Column="18" TopLine="729"/>
+        <Filename Value="systables.pas"/>
+        <Caret Line="1" Column="1" TopLine="1"/>
       </Position22>
       <Position23>
-        <Filename Value="systables.pas"/>
-        <Caret Line="309" Column="3" TopLine="298"/>
+        <Filename Value="main.pas"/>
+        <Caret Line="754" Column="3" TopLine="750"/>
       </Position23>
       <Position24>
-        <Filename Value="systables.pas"/>
-        <Caret Line="87" Column="1" TopLine="54"/>
+        <Filename Value="about.pas"/>
+        <Caret Line="82" Column="24" TopLine="67"/>
       </Position24>
       <Position25>
-        <Filename Value="main.pas"/>
-        <Caret Line="4218" Column="1" TopLine="4184"/>
+        <Filename Value="querywindow.pas"/>
+        <Caret Line="950" Column="1" TopLine="944"/>
       </Position25>
       <Position26>
-        <Filename Value="systables.pas"/>
-        <Caret Line="103" Column="3" TopLine="101"/>
+        <Filename Value="querywindow.pas"/>
+        <Caret Line="910" Column="3" TopLine="907"/>
       </Position26>
       <Position27>
-        <Filename Value="systables.pas"/>
-        <Caret Line="1" Column="1" TopLine="1"/>
+        <Filename Value="main.pas"/>
+        <Caret Line="21" Column="17" TopLine="3"/>
       </Position27>
       <Position28>
-        <Filename Value="update.pas"/>
-        <Caret Line="171" Column="40" TopLine="265"/>
+        <Filename Value="main.pas"/>
+        <Caret Line="2376" Column="1" TopLine="2375"/>
       </Position28>
       <Position29>
         <Filename Value="main.pas"/>
-        <Caret Line="754" Column="3" TopLine="750"/>
+        <Caret Line="1766" Column="3" TopLine="1758"/>
       </Position29>
       <Position30>
-        <Filename Value="about.pas"/>
-        <Caret Line="82" Column="24" TopLine="67"/>
+        <Filename Value="main.pas"/>
+        <Caret Line="127" Column="5" TopLine="110"/>
       </Position30>
     </JumpHistory>
   </ProjectOptions>

main.pas

@@ -2373,13 +2373,8 @@ begin
 end;
 
 procedure TfmMain.lmUserPermManagementClick(Sender: TObject);
-var
-  fmPermissions: TfmPermissionManage;
 begin
   lmRolePerManagementClick(nil);
-  fmPermissions:= TfmPermissionManage.Create(nil);
-  fmPermissions.Init(tvMain.Selected.Parent.Parent.OverlayIndex, '', tvMain.Selected.Text, 1);
-  fmPermissions.Show;
 end;
 
 (**********  View Domain info ************)

querywindow.pas

@@ -1187,7 +1187,7 @@ begin
           // Create thread to open dataset
           fQT:= TQueryThread.Create('open');
           fQT.Query:= fSqlQuery;
-         // fQT.OnTerminate:= @ThreadTerminated;
+          // fQT.OnTerminate:= @ThreadTerminated;
           faText:= fTab.Caption;
           fTab.Caption:= 'Running..';
           fQT.Resume;