Changeset 41 for trunk/Forms/UFormMain.pas

Timestamp:

Jul 14, 2016, 1:15:42 PM (8 years ago)

Author:

chronos

Message:

• Fixed: Do not allow operations with acronym database if file is in closed state.
• Fixed: Do not show dash symobol if no project is openned.

File:

• trunk/Forms/UFormMain.pas (modified) (1 diff)

trunk/Forms/UFormMain.pas

@@ -516 +516 @@
   AFileSaveAs.Enabled := Assigned(AcronymDb);
   AManualImport.Enabled := Assigned(AcronymDb);
+  AProcessImports.Enabled := Assigned(AcronymDb);
   AShowCategories.Enabled := Assigned(AcronymDb);
   AShowAcronyms.Enabled := Assigned(AcronymDb);
+  AShowCategories.Enabled := Assigned(AcronymDb);
   AShowImportSources.Enabled := Assigned(AcronymDb);
+  AShowImportFormats.Enabled := Assigned(AcronymDb);
   ToolBar1.Visible := MenuItemToolbar.Checked;
 
   Title := Application.Title;
-  if Assigned(AcronymDb) then Title := Title + ' - ' + ExtractFileName(AcronymDb.FileName);
+  if Assigned(AcronymDb) and (ExtractFileName(AcronymDb.FileName) <> '') then
+    if Assigned(AcronymDb) then Title := Title + ' - ' + ExtractFileName(AcronymDb.FileName);
   if Assigned(AcronymDb) and AcronymDb.Modified then Title := Title + ' (' + SModified + ')';
   Caption := Title;