mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-05 23:17:57 +02:00
25 lines
540 B
ObjectPascal
25 lines
540 B
ObjectPascal
unit DefaultTranslator;
|
|
|
|
{
|
|
If you need standard translation, just use this unit in your project and enable
|
|
i18n in project options. It will translate your project automatically.
|
|
|
|
If you want to set translation language yourself, use LCLTranslator unit instead
|
|
and call SetDefaultLang in your program manually.
|
|
}
|
|
{$mode objfpc}{$H+}
|
|
|
|
interface
|
|
|
|
uses
|
|
LCLTranslator;
|
|
|
|
implementation
|
|
|
|
initialization
|
|
//It is safe to place code here as no form is initialized before unit
|
|
//initialization is made
|
|
SetDefaultLang('', '', '', false);
|
|
|
|
end.
|