1 unit DefaultTranslator; 2 3 { Copyright (C) 2015 Lazarus Developers Team 4 5 This library is free software; you can redistribute it and/or modify it 6 under the terms of the GNU Library General Public License as published by 7 the Free Software Foundation; either version 2 of the License, or (at your 8 option) any later version. 9 10 This program is distributed in the hope that it will be useful, but WITHOUT 11 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 12 FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License 13 for more details. 14 15 You should have received a copy of the GNU Library General Public License 16 along with this library; if not, write to the Free Software Foundation, 17 Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA. 18 } 19 { 20 If you need standard translation, just use this unit in your project and enable 21 i18n in project options. It will translate your project automatically. 22 23 If you want to set translation language yourself, use LCLTranslator unit instead 24 and call SetDefaultLang in your program manually. 25 } 26 {$mode objfpc}{$H+} 27 28 interface 29 30 uses 31 LCLTranslator; 32 33 implementation 34 35 initialization 36 //It is safe to place code here as no form is initialized before unit 37 //initialization is made 38 SetDefaultLang('', '', false); 39 40 end. 41