teeofficeconstants.pas

第三方控件：PaintGrid.pas 网格型仪表控件源文件 Mymeter.pas 圆型仪表控件源文件 Project1是这两个控件的使用范例。 该

{**********************************************}
{   TeeChart Office - Constant strings         }
{   Copyright (c) 2001 by David Berneda        }
{   All Rights Reserved.                       }
{**********************************************}
{$I TeeDefs.inc}
unit TeeOfficeConstants;

interface

Const
  { DO NOT TRANSLATE ! }
  TeeChartServer             = 'http://www.steema.net/';
  TeeChartWeb                = 'http://www.steema.com/';
  TeeSteemaGetPassword       = TeeChartServer+'scripts/TeeGetPassword.exe';
  TeeSteemaUploadGallery     = TeeChartServer+'scripts/teeupload.exe?login=%s&Password=%s&ID=%s';

var
  TeeMsg_ZoomInstructions,
  TeeMsg_ScrollInstructions,
  TeeMsg_DrawLineInstructions,

  TeeMsg_SureToDeleteDataSet,
  TeeMsg_Select,
  TeeMsg_EMail,
  TeeMsg_Open,
  TeeMsg_New,
  TeeMsg_ImportingWeb,
  TeeMsg_Annotation,
  TeeMsg_Modified,

  TeeMsg_Next,
  TeeMsg_OK,
  TeeMsg_Close,
  TeeMsg_Go,
  TeeMsg_Upload,

  TeeMsg_CannotGetVersion,

  TeeMsg_CannotGetNewVersion,

  TeeMsg_WrongVersion,
  TeeMsg_HasLatestVersion,
  TeeMsg_ClickToUpdateVersion,
  TeeMsg_UpdateButton,
  TeeMsg_WrongZip,
  TeeMsg_VersionReceived,

  TeeMsg_SelectFolder,
  TeeMsg_EmailNotValid,
  TeeMsg_NameNotValid,
  TeeMsg_WrongPassword,

  TeeMsg_WrongChartID,
  TeeMsg_CannotObtainPassword,
  TeeMsg_PasswordSent,
  TeeMsg_Congrats,

  TeeMsg_UploadingWeb,
  TeeMsg_Uploaded,

  TeeMsg_TitleEditor,
  TeeMsg_EnterValue,
  TeeMsg_PointWidth,
  TeeMsg_PointHeight,

  TeeMsg_Position,
  TeeMsg_Size,

  TeeMsg_BetaWarning,

  TeeMsg_Caps,
  TeeMsg_Num,
  TeeMsg_SCR,

  TeeMsg_SaveAs,

  TeeMsg_ShouldClose,
   
  TeeMsg_Table,
  TeeMsg_Query             : String;

Procedure TeeOfficeEnglish;

Procedure TeeOfficeSpanish;
Procedure TeeOfficeCatalan;
Procedure TeeOfficeGalician;
Procedure TeeOfficeGerman;
Procedure TeeOfficeFrench;
Procedure TeeOfficeBrazil;
Procedure TeeOfficeDanish;
Procedure TeeOfficeDutch;
Procedure TeeOfficeSwedish;
Procedure TeeOfficeChinese;
Procedure TeeOfficeChineseSimp;
Procedure TeeOfficePortuguese;
Procedure TeeOfficeRussian;
Procedure TeeOfficeItalian;
Procedure TeeOfficeNorwegian;
Procedure TeeOfficeJapanese;
Procedure TeeOfficePolish;
Procedure TeeOfficeSlovene;
Procedure TeeOfficeTurkish;
Procedure TeeOfficeHungarian;

implementation

Uses TeeSpanish, TeeCatalan, TeeGerman, TeeFrench, TeeDanish, TeeDutch,
     TeeChinese, TeeBrazil, TeeSwedish, TeeChineseSimp, TeePortuguese,
     TeeRussian, TeeItalian, TeeNorwegian, TeeJapanese, TeePolish,
     TeeSlovene, TeeTurkish, TeeHungarian, TeeGalician,
     TeeConst, TeeProCo, SysUtils;

Procedure SetEnglishConstants;
begin
  TeeMsg_ZoomInstructions    :='Drag mouse to right-bottom to zoom. To left-top to unzoom.';
  TeeMsg_ScrollInstructions  :='Drag mouse to scroll Chart contents.';
  TeeMsg_DrawLineInstructions:='Drag mouse to draw, select and move lines.';

  TeeMsg_SureToDeleteDataSet :='Are you sure to delete DataSet?';
  TeeMsg_Select              :='Select';
  TeeMsg_EMail               :='e-mail';
  TeeMsg_Open                :='Open';
  TeeMsg_New                 :='New';
  TeeMsg_ImportingWeb        :='Importing from Web: %s';
  TeeMsg_Annotation          :='Annotation';
  TeeMsg_Modified            :='Modified';

  TeeMsg_Next                :='&Next >';
  TeeMsg_OK                  :='OK';
  TeeMsg_Close               :='Close';
  TeeMsg_Go                  :='&Go !';
  TeeMsg_Upload              :='&Upload !';

  TeeMsg_CannotGetVersion    :='Cannot connect to obtain current version.'+#13+
                              'Error: %d %s';

  TeeMsg_CannotGetNewVersion :='Cannot download current version.'+#13+
                              'Error: %d %s';

  TeeMsg_WrongVersion        :='Wrong version number received.';
  TeeMsg_HasLatestVersion    :='You already have the latest version.';
  TeeMsg_ClickToUpdateVersion:='Click the Update button to receive the latest version.';
  TeeMsg_UpdateButton        :='&Update...';
  TeeMsg_WrongZip            :='Wrong version file received.';
  TeeMsg_VersionReceived     :='Latest version received. Click Ok to Install.';

  TeeMsg_SelectFolder        :='Select Folder';
  TeeMsg_EmailNotValid       :='Email address is not correct.';
  TeeMsg_NameNotValid        :='Your Name is empty. Please type your name.';
  TeeMsg_WrongPassword       :='Password is empty. Please type your password or '+#13+
                              'click the Obtain Password button to receive it by e-mail.';
  TeeMsg_WrongChartID        :='Chart name is empty. Please type a Chart name to '+
                              'identify it at the Web Gallery database.';

  TeeMsg_CannotObtainPassword:='Cannot connect to obtain your Password.';
  TeeMsg_PasswordSent        :='Your Password has been sent to your email address.';
  TeeMsg_Congrats            :='Congratulations.'+#13+'You have been included in TeeChart Office '+
                              'Web Charts Gallery user database.'+#13+
                              TeeMsg_PasswordSent;

  TeeMsg_UploadingWeb        :='Uploading %s to Web Gallery...';
  TeeMsg_Uploaded            :='%s has been uploaded to Web Gallery.';

  TeeMsg_TitleEditor         :='Title Editor';
  TeeMsg_EnterValue          :='Enter value';
  TeeMsg_PointWidth          :='Width';
  TeeMsg_PointHeight         :='Height';

  TeeMsg_Position            :='Position: %d,%d';
  TeeMsg_Size                :='Size: %d x %d';

  TeeMsg_BetaWarning         :='Note: '+
                              'This is Pre-Release Software.'+#13+#13+
                              'Some features might be incomplete or'+#13+
                              'removed in the final product version.'+#13+#13+
                              'Submit problems and suggestions at our web site:'+#13+#13+
                              'www.steema.com';

  TeeMsg_Caps               :='CAPS';
  TeeMsg_Num                :='NUM';
  TeeMsg_SCR                :='SCR';
  TeeMsg_SaveAs             :='Save as...';
  TeeMsg_ShouldClose        :='Please close and restart the application.';
  TeeMsg_Table              :='Table';
  TeeMsg_Query              :='Query';
end;

Procedure TeeOfficeEnglish;
begin
  SetEnglishConstants;
  TeeSetEnglish;
end;

Procedure TeeOfficeSpanish;

Procedure SetSpanishConstants;
begin
  TeeMsg_ZoomInstructions    :='Arrastrar rat髇 derecha-abajo para zoom. Izquierda-arriba para quitar zoom.';
  TeeMsg_ScrollInstructions  :='Arrastrar rat髇 para desplazar el contenido del gr醘ico.';
  TeeMsg_DrawLineInstructions:='Arrastrar rat髇 para dibujar, seleccionar y mover lineas.';

  TeeMsg_SureToDeleteDataSet :='縎eguro que desea eliminar la Tabla?';
  TeeMsg_Select              :='Selecciona';
  TeeMsg_EMail               :='e-mail';
  TeeMsg_Open                :='Abrir';
  TeeMsg_New                 :='Nuevo';
  TeeMsg_ImportingWeb        :='Importando del Web: %s';
  TeeMsg_Annotation          :='Anotaci髇';
  TeeMsg_Modified            :='Modific.';

  TeeMsg_Next                :='&Siguiente >';
  TeeMsg_OK                  :='Aceptar';
  TeeMsg_Close               :='Cerrar';
  TeeMsg_Go                  :='&Ir !';
  TeeMsg_Upload              :='&Subir !';

  TeeMsg_CannotGetVersion    :='No se puede obtener la versi髇 m醩 actual.'+#13+
                              'Error: %d %s';

  TeeMsg_CannotGetNewVersion :='No se puede descargar la versi髇 m醩 actual.'+#13+
                              'Error: %d %s';

  TeeMsg_WrongVersion        :='N鷐ero de versi髇 recibido err髇eo.';
  TeeMsg_HasLatestVersion    :='Ya tiene la 鷏tima versi髇.';
  TeeMsg_ClickToUpdateVersion:='Pulse Actualizar para recibir la versi髇 actualizada.';
  TeeMsg_UpdateButton        :='&Actualizar...';
  TeeMsg_WrongZip            :='Archivo de versi髇 recibido incorrecto.';
  TeeMsg_VersionReceived     :='Ultima versi髇 recibida. Pulse Aceptar para instalar.';

  TeeMsg_SelectFolder        :='Seleccionar Carpeta';
  TeeMsg_EmailNotValid       :='La direcci髇 de Correo no es correcta.';
  TeeMsg_NameNotValid        :='Por favor escriba su Nombre.';
  TeeMsg_WrongPassword       :='La contrase馻 est