Changeset 10 for trunk/UFormImport.pas


Ignore:
Timestamp:
Apr 22, 2016, 9:59:52 PM (9 years ago)
Author:
chronos
Message:
  • Added: Interface localization support.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/UFormImport.pas

    r8 r10  
    3838uses
    3939  UFormMain;
     40
     41resourcestring
     42  SImportedNewAcronyms = 'Imported %d new acronyms.';
    4043
    4144
     
    112115  end;
    113116  if AddedCount > 0 then FormMain.AcronymDb.Modified := True;
    114   ShowMessage(Format('Imported %d new acronyms.', [AddedCount]));
     117  ShowMessage(Format(SImportedNewAcronyms, [AddedCount]));
    115118end;
    116119
     
    159162  Columns.Free;
    160163  if AddedCount > 0 then FormMain.AcronymDb.Modified := True;
    161   ShowMessage(Format('Imported %d new acronyms.', [AddedCount]));
     164  ShowMessage(Format(SImportedNewAcronyms, [AddedCount]));
    162165end;
    163166
Note: See TracChangeset for help on using the changeset viewer.