SSL language.pas.~1~   Sprache: unbekannt

//------------------------------------------------------------
//
//
//------------------------------------------------------------
unit Language;
//----------------------------------------------------------------------------
//
//----------------------------------------------------------------------------
interface
uses
  Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,
  Dialogs,StdCtrls,ComCtrls,jpeg,ExtCtrls,StrUtils,WinSock,Registry,
  ShellAPI,Math,DateUtils,Gendefs, Utilities;
//----------------------------------------------------------------------------
//
//----------------------------------------------------------------------------
//type
  //Naturallanguages=(english,german,l1,l2,l3,l4,l5,l6,l7,l8,l9,l10);
  //------------------------------------------------------------------------------
  //----------------------------------------------------------------------------
  //
  //----------------------------------------------------------------------------
function trans(lang:Naturallanguages;n:integer;S:JString):JString;
implementation
function trans(lang:Naturallanguages;n:integer;S:JString):JString;
begin
  trans:=S
end;
end.
//----------------------------------------------------------------------------
// Ende der Quelle
//----------------------------------------------------------------------------