Changeset 94 for trunk/NewView/BookmarksFormUnit.pas

Timestamp:

Mar 10, 2007, 8:05:21 PM (18 years ago)

Author:

RBRi

Message:

+ i18n debug messages

File:

• trunk/NewView/BookmarksFormUnit.pas (modified) (2 diffs)

trunk/NewView/BookmarksFormUnit.pas

@@ -67 +67 @@
   ControlsUtility,
   ACLDialogs,
-  ACLStringUtility;
+  ACLStringUtility,
+  DebugUnit;
 
 Procedure TBookmarksForm.BookmarksFormOnSetupShow (Sender: TObject);
@@ -84 +85 @@
                                           const Apply: boolean );
 begin
+  LogEvent(LogI18n, 'TBookmarksForm.OnLanguageEvent apply: "' + BoolToStr(Apply) + '"');
   Language.LoadComponentLanguage( self, Apply );