Автоопределение языка

  1. program autolocale;
  2.  
  3. var
  4.     locale: string;
  5.  
  6. begin
  7.  
  8.     locale:= getProperty('microedition.locale'); // Определение языка
  9.  
  10.     if locale = 'en' then drawText('Hello World', 0, 0); // if English
  11.  
  12.     if locale = 'ru-RU' then drawText('Привет, мир', 0, 0); // если Русский
  13.  
  14.     if locale = 'uk-UA' then drawText('Привіт, світе', 0, 0); // якщо Українська
  15.  
  16.     repaint; // выводим
  17.     delay(5000); // задержка 5сек.
  18.  
  19. end.
Вот так просто можно сделать ваш софт мультиязычным.

Реклама

Мы в соцсетях

tw tg yt gt