[Initranslator-svncheckins] SF.net SVN: initranslator: [133] translator/trunk/src

[<pe...@us...>]

Revision: 133
          http://svn.sourceforge.net/initranslator/?rev=133&view=rev
Author:   peter3
Date:     2006-11-22 07:44:43 -0800 (Wed, 22 Nov 2006)

Log Message:
-----------
- Don't lock listview while toolitem plugin is active

Modified Paths:
--------------
    translator/trunk/src/MainFrm.dfm
    translator/trunk/src/MainFrm.pas

Modified: translator/trunk/src/MainFrm.dfm
===================================================================
--- translator/trunk/src/MainFrm.dfm	2006-11-22 15:18:34 UTC (rev 132)
+++ translator/trunk/src/MainFrm.dfm	2006-11-22 15:44:43 UTC (rev 133)
@@ -1408,6 +1408,7 @@
     object acMakeConsistent: TTntAction
       Category = 'Actions'
       Caption = 'Make all translations consistent'
+      ShortCut = 120
       OnExecute = acMakeConsistentExecute
     end
   end

Modified: translator/trunk/src/MainFrm.pas
===================================================================
--- translator/trunk/src/MainFrm.pas	2006-11-22 15:18:34 UTC (rev 132)
+++ translator/trunk/src/MainFrm.pas	2006-11-22 15:44:43 UTC (rev 133)
@@ -3170,6 +3170,7 @@
             not WideSameText(FTrans, FTranslateFile.Items[j].Translation) then
           begin
             FTranslateFile.Items[j].Translation := FTrans;
+            FTranslateFile.Items[j].Translated := true;
             Modified := true;
           end;
         end;
@@ -3743,7 +3744,7 @@
 begin
 
   i := lvTranslateStrings.ItemIndex;
-  lvTranslateStrings.Items.BeginUpdate;
+//  lvTranslateStrings.Items.BeginUpdate;
   try
     T := TExternalToolItem((Sender as TTBCustomItem).Tag);
     AItem := SelectedItem;
@@ -3752,7 +3753,7 @@
     lvTranslateStrings.Invalidate;
   finally
 
-    lvTranslateStrings.Items.EndUpdate;
+//    lvTranslateStrings.Items.EndUpdate;
     if AItem <> nil then
       SelectedItem := AItem
     else


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.