1 <?xml version=
"1.0" encoding=
"UTF-8"?>
2 <!DOCTYPE script:module PUBLIC
"-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
3 <script:module xmlns:
script=
"http://openoffice.org/2000/script" script:
name=
"L10N" script:
language=
"StarBasic">REM =======================================================================================================================
4 REM === The Access2Base library is a part of the LibreOffice project. ===
5 REM === Full documentation is available on http://www.access2base.com ===
6 REM =======================================================================================================================
10 REM -----------------------------------------------------------------------------------------------------------------------
11 REM --- PRIVATE FUNCTIONS ---
12 REM -----------------------------------------------------------------------------------------------------------------------
14 Public Function _GetLabel(ByVal psShortlabel As String, Optional ByVal psLocale As String) As String
15 ' Return the localized label corresponding with ShortLabel
17 If IsMissing(psLocale) Then psLocale = UCase(Left(_A2B_.Locale,
2)) Else psLocale = UCase(psLocale)
18 On Local Error Goto Error_Function
19 If Not Utils._InList(psLocale, Array( _
20 "EN
",
"FR
",
"ES
",
"DE
" _
21 )) Then psLocale =
"DEFAULT
" ' If list incomplete a recursive call will be provided anyway
26 Case
"EN
",
"DEFAULT
"
27 Select Case UCase(psShortlabel)
28 Case
"ERR
" & ERRDBNOTCONNECTED : sLocal =
"No active connection to a database found
"
29 Case
"ERR
" & ERRMISSINGARGUMENTS : sLocal =
"Arguments are missing or are not initialized
"
30 Case
"ERR
" & ERRWRONGARGUMENT : sLocal =
"Argument nr. %
0 [Value =
'%
1'] is invalid
"
31 Case
"ERR
" & ERRMAINFORM : sLocal =
"Document
'%
0' does not contain any form
"
32 Case
"ERR
" & ERRFORMNOTIDENTIFIED : sLocal =
"Form
'%
0' not identified in database Forms set
"
33 Case
"ERR
" & ERRFORMNOTFOUND : sLocal =
"Form
'%
0' not found
"
34 Case
"ERR
" & ERRFORMNOTOPEN : sLocal =
"Form
'%
0' is currently not open
"
35 Case
"ERR
" & ERRDFUNCTION : sLocal =
"DFunction execution failed, SQL=%
0"
36 Case
"ERR
" & ERROPENFORM : sLocal =
"Form
'%
0' could not be opened
"
37 Case
"ERR
" & ERRPROPERTY : sLocal =
"Property
'%
0' not applicable in this context
"
38 Case
"ERR
" & ERRPROPERTYVALUE : sLocal =
"Value
'%
0' is invalid for property
'%
1'"
39 Case
"ERR
" & ERRINDEXVALUE : sLocal =
"Out of array range or incorrect array size for property
'%
0'"
40 Case
"ERR
" & ERRCOLLECTION : sLocal =
"Out of array range
"
41 Case
"ERR
" & ERRPROPERTYNOTARRAY : sLocal =
"Argument nr.%
0 should be an array
"
42 Case
"ERR
" & ERRCONTROLNOTFOUND : sLocal =
"Control
'%
0' not found in parent (form, grid or dialog)
'%
1'"
43 Case
"ERR
" & ERRNOACTIVEFORM : sLocal =
"No active form or control found
"
44 Case
"ERR
" & ERRDATABASEFORM : sLocal =
"Form
'%
0' has no underlying dataset
"
45 Case
"ERR
" & ERRFOCUSINGRID : sLocal =
"Control
'%
0' not found in gridcontrol
'%
1'"
46 Case
"ERR
" & ERRNOGRIDINFORM : sLocal =
"No gridcontrol found in form
'%
0'"
47 Case
"ERR
" & ERRFINDRECORD : sLocal =
"FindNext() must be preceded by a successful FindRecord(...) call
"
48 Case
"ERR
" & ERRSQLSTATEMENT : sLocal =
"SQL Error, SQL statement =
'%
0'"
49 Case
"ERR
" & ERROBJECTNOTFOUND : sLocal =
"%
0 '%
1' not found
"
50 Case
"ERR
" & ERROPENOBJECT : sLocal =
"%
0 '%
1' could not be opened
"
51 Case
"ERR
" & ERRCLOSEOBJECT : sLocal =
"%
0 '%
1' could not be closed
"
52 Case
"ERR
" & ERRACTION : sLocal =
"Action not applicable in this context
"
53 Case
"ERR
" & ERRSENDMAIL : sLocal =
"Mail service could not be activated
"
54 Case
"ERR
" & ERRFORMYETOPEN : sLocal =
"Form %
0 is already open
"
55 Case
"ERR
" & ERRMETHOD : sLocal =
"Method
'%
0' not applicable in this context
"
56 Case
"ERR
" & ERRPROPERTYINIT : sLocal =
"Property
'%
0' applicable but not initialized
"
57 Case
"ERR
" & ERRFILENOTCREATED : sLocal =
"File
'%
0' could not be created
"
58 Case
"ERR
" & ERRDIALOGNOTFOUND : sLocal =
"Dialog
'%
0' not found in the currently loaded libraries
"
59 Case
"ERR
" & ERRDIALOGUNDEFINED : sLocal =
"Dialog unknown
"
60 Case
"ERR
" & ERRDIALOGSTARTED : sLocal =
"Dialog already started
"
61 Case
"ERR
" & ERRDIALOGNOTSTARTED : sLocal =
"Dialog
'%
0' not active
"
62 Case
"ERR
" & ERRRECORDSETNODATA : sLocal =
"Recordset delivered no data. Action on current record rejected
"
63 Case
"ERR
" & ERRRECORDSETCLOSED : sLocal =
"Recordset has been closed. Recordset action rejected
"
64 Case
"ERR
" & ERRRECORDSETRANGE : sLocal =
"Current record out of range
"
65 Case
"ERR
" & ERRRECORDSETFORWARD : sLocal =
"Action rejected in a forward-only or not bookmarkable recordset
"
66 Case
"ERR
" & ERRFIELDNULL : sLocal =
"Field is null or empty. Action rejected
"
67 Case
"ERR
" & ERRFILEACCESS : sLocal =
"File access error on file
'%
0'"
68 Case
"ERR
" & ERROVERFLOW : sLocal =
"Field length (%
0) exceeds maximum length. Use the
'%
1' method instead
"
69 Case
"ERR
" & ERRNOTACTIONQUERY : sLocal =
"Query
'%
0' is not an action query
"
70 Case
"ERR
" & ERRNOTUPDATABLE : sLocal =
"Database, recordset or field is read only
"
71 Case
"ERR
" & ERRUPDATESEQUENCE : sLocal =
"Recordset update sequence error
"
72 Case
"ERR
" & ERRNOTNULLABLE : sLocal =
"Field
'%
0' must not contain a NULL value
"
73 Case
"ERR
" & ERRROWDELETED : sLocal =
"Current row has been deleted by another process or user
"
74 Case
"ERR
" & ERRRECORDSETCLONE : sLocal =
"Cloning a cloned Recordset is forbidden
"
75 Case
"ERR
" & ERRQUERYDEFDELETED : sLocal =
"Pre-existing query
'%
0' has been deleted
"
76 Case
"ERR
" & ERRTABLEDEFDELETED : sLocal =
"Pre-existing table
'%
0' has been deleted
"
77 Case
"ERR
" & ERRTABLECREATION : sLocal =
"Table
'%
0' could not be created
"
78 Case
"ERR
" & ERRFIELDCREATION : sLocal =
"Field
'%
0' could not be created
"
79 Case
"ERR
" & ERRSUBFORMNOTFOUND : sLocal =
"Subform
'%
0' not found in parent form
'%
1'"
80 Case
"ERR
" & ERRWINDOW : sLocal =
"Current window is not a document
"
81 Case
"ERR
" & ERRCOMPATIBILITY : sLocal =
"Field
'%
0' could not be converted due to incompatibility of field types between the respective database systems
"
82 Case
"ERR
" & ERRPRECISION : sLocal =
"Field
'%
0' could not be loaded in record #%
1 due to capacity shortage
"
83 Case
"ERR
" & ERRMODULENOTFOUND : sLocal =
"Module
'%
0' not found in the currently loaded libraries
"
84 Case
"ERR
" & ERRPROCEDURENOTFOUND : sLocal =
"Procedure
'%
0' not found in module
'%
1'"
85 '----------------------------------------------------------------------------------------------------------------------
86 Case
"OBJECT
" : sLocal =
"Object
"
87 Case
"TABLE
" : sLocal =
"Table
"
88 Case
"QUERY
" : slocal =
"Query
"
89 Case
"FORM
" : sLocal =
"Form
"
90 Case
"REPORT
" : sLocal =
"Report
"
91 Case
"RECORDSET
" : sLocal =
"Recordset
"
92 Case
"FIELD
" : sLocal =
"Field
"
93 Case
"TEMPVAR
" : sLocal =
"Temporary variable
"
94 Case
"COMMANDBAR
" : sLocal =
"Command bar
"
95 Case
"COMMANDBARCONTROL
" : sLocal =
"Command bar control
"
96 '----------------------------------------------------------------------------------------------------------------------
97 Case
"ERR#
" : sLocal =
"Error #
"
98 Case
"ERROCCUR
" : sLocal =
"occurred
"
99 Case
"ERRLINE
" : sLocal =
"at line
"
100 Case
"ERRIN
" : sLocal =
"in
"
101 Case
"CALLTO
" : sLocal =
"a call to function
"
102 Case
"SAVECONSOLE
" : sLocal =
"Save console
"
103 Case
"SAVECONSOLEENTRIES
" : sLocal =
"The console entries have been saved successfully.
"
104 Case
"QUITSHORT
" : sLocal =
"Quit
"
105 Case
"QUIT
" : sLocal =
"Do you really want to quit the application ? Changed data will be saved.
"
106 Case
"ENTERING
" : sLocal =
"Entering
"
107 Case
"EXITING
" : sLocal =
"Exiting
"
108 '----------------------------------------------------------------------------------------------------------------------
109 Case
"DLGTRACE_HELP
" : sLocal =
"Manage the console buffer and its entries
"
110 Case
"DLGTRACE_TITLE
" : sLocal =
"Console
"
111 Case
"DLGTRACE_LBLENTRIES_HELP
" : sLocal =
"Clear the list and resize the circular buffer
"
112 Case
"DLGTRACE_LBLENTRIES_LABEL
" : sLocal =
"Set max number of entries
"
113 Case
"DLGTRACE_TXTTRACELOG_HELP
" : sLocal =
"Text can be selected, copied, ...
"
114 Case
"DLGTRACE_TXTTRACELOG_TEXT
" : sLocal =
"--- Log file is empty ---
"
115 Case
"DLGTRACE_CMDCANCEL_HELP
" : sLocal =
"Cancel and close the dialog
"
116 Case
"DLGTRACE_CMDCANCEL_LABEL
" : sLocal =
"Cancel
"
117 Case
"DLGTRACE_LBLCLEAR_HELP
" : sLocal =
"Clear the list
"
118 Case
"DLGTRACE_LBLCLEAR_LABEL
" : sLocal =
"Clear the list
"
119 Case
"DLGTRACE_LBLMINLEVEL_HELP
" : sLocal =
"Register only logging requests above given level
"
120 Case
"DLGTRACE_LBLMINLEVEL_LABEL
" : sLocal =
"Set minimal trace level
"
121 Case
"DLGTRACE_CMDOK_HELP
" : sLocal =
"Validate
"
122 Case
"DLGTRACE_CMDOK_LABEL
" : sLocal =
"OK
"
123 Case
"DLGTRACE_CMDDUMP_HELP
" : sLocal =
"Choose a file and dump the actual list content in it
"
124 Case
"DLGTRACE_CMDDUMP_LABEL
" : sLocal =
"Dump to file
"
125 Case
"DLGTRACE_LBLNBENTRIES_HELP
" : sLocal =
"Actual size of list
"
126 Case
"DLGTRACE_LBLNBENTRIES_LABEL
" : sLocal =
"Actual number of entries:
"
127 '----------------------------------------------------------------------------------------------------------------------
128 Case
"DLGFORMAT_HELP
" : sLocal =
"Export the form
"
129 Case
"DLGFORMAT_TITLE
" : sLocal =
"OutputTo
"
130 Case
"DLGFORMAT_LBLFORMAT_HELP
" : sLocal =
"Format in which the form should be exported
"
131 Case
"DLGFORMAT_LBLFORMAT_LABEL
" : sLocal =
"Select the output format
"
132 Case
"DLGFORMAT_CMDOK_HELP
" : sLocal =
"Validate your choice
"
133 Case
"DLGFORMAT_CMDOK_LABEL
" : sLocal =
"OK
"
134 Case
"DLGFORMAT_CMDCANCEL_HELP
" : sLocal =
"Cancel and close the dialog
"
135 Case
"DLGFORMAT_CMDCANCEL_LABEL
" : sLocal =
"Cancel
"
136 '----------------------------------------------------------------------------------------------------------------------
137 Case Else : sLocal =
""
140 Select Case UCase(psShortlabel)
141 Case
"ERR
" & ERRDBNOTCONNECTED : sLocal =
"Pas de connexion active trouvée à une banque de données
"
142 Case
"ERR
" & ERRMISSINGARGUMENTS : sLocal =
"Des arguments sont manquants ou non initialisés
"
143 Case
"ERR
" & ERRWRONGARGUMENT : sLocal =
"L
'argument n° %
0 [Valeur =
'%
1'] n
'est pas valable
"
144 Case
"ERR
" & ERRMAINFORM : sLocal =
"Le document
'%
0' ne contient aucun formulaire
"
145 Case
"ERR
" & ERRFORMNOTIDENTIFIED : sLocal =
"Le formulaire
'%
0' n
'a pas pu être identifié parmi l
'ensemble des formulaires de la Database
"
146 Case
"ERR
" & ERRFORMNOTFOUND : sLocal =
"Formulaire
'%
0' non trouvé
"
147 Case
"ERR
" & ERRFORMNOTOPEN : sLocal =
"Le formulaire
'%
0' n
'est actuellement pas ouvert
"
148 Case
"ERR
" & ERRDFUNCTION : sLocal =
"L
'exécution de la
""fonction database
"" a échoué, SQL=%
0"
149 Case
"ERR
" & ERROPENFORM : sLocal =
"Le formulaire
'%
0' n
'a pas pu être ouvert
"
150 Case
"ERR
" & ERRPROPERTY : sLocal =
"La propriété
'%
0' n
'est pas applicable dans ce contexte
"
151 Case
"ERR
" & ERRPROPERTYVALUE : sLocal =
"La valeur
'%
0' est invalide pour la propriété
'%
1'"
152 Case
"ERR
" & ERRINDEXVALUE : sLocal =
"Indice invalide ou dimension erronée du tableau pour la propriété
'%
0'"
153 Case
"ERR
" & ERRCOLLECTION : sLocal =
"Indice de tableau invalide
"
154 Case
"ERR
" & ERRPROPERTYNOTARRAY : sLocal =
"L
'argument n°%
0 doit être un tableau
"
155 Case
"ERR
" & ERRCONTROLNOTFOUND : sLocal =
"Contrôle
'%
0' non trouvé dans le parent (formulaire, contrôle de table ou dialogue)
'%
1'"
156 Case
"ERR
" & ERRNOACTIVEFORM : sLocal =
"Pas de formulaire ou de contrôle actif
"
157 Case
"ERR
" & ERRDATABASEFORM : sLocal =
"Le formulaire
'%
0' n
'a pas de données sous-jacentes
"
158 Case
"ERR
" & ERRFOCUSINGRID : sLocal =
"Contrôle
'%
0' non trouvé dans le contrôle de table
'%
1'"
159 Case
"ERR
" & ERRNOGRIDINFORM : sLocal =
"Aucun contrôle de table trouvé dans le formulaire
'%
0'"
160 Case
"ERR
" & ERRFINDRECORD : sLocal =
"FindNext() doit être précédé par un appel réussi à FindRecord(...)
"
161 Case
"ERR
" & ERRSQLSTATEMENT : sLocal =
"Erreur SQL, instruction SQL =
'%
0'"
162 Case
"ERR
" & ERROBJECTNOTFOUND : sLocal =
"%
0 '%
1' non trouvé(e)
"
163 Case
"ERR
" & ERROPENOBJECT : sLocal =
"%
0 '%
1': ouverture en échec
"
164 Case
"ERR
" & ERRCLOSEOBJECT : sLocal =
"%
0 '%
1': fermeture en échec
"
165 Case
"ERR
" & ERRACTION : sLocal =
"Action non applicable dans ce contexte
"
166 Case
"ERR
" & ERRSENDMAIL : sLocal =
"Le service de messagerie n
'a pas pu être activé
"
167 Case
"ERR
" & ERRFORMYETOPEN : sLocal =
"Le formulaire %
0 est déjà ouvert
"
168 Case
"ERR
" & ERRMETHOD : sLocal =
"La méthode
'%
0' n
'est pas applicable dans ce contexte
"
169 Case
"ERR
" & ERRPROPERTYINIT : sLocal =
"Propriété
'%
0' applicable mais non initialisée
"
170 Case
"ERR
" & ERRFILENOTCREATED : sLocal =
"Erreur de création du fichier
'%
0'"
171 Case
"ERR
" & ERRDIALOGNOTFOUND : sLocal =
"Dialogue
'%
0' introuvable dans les librairies chargées actuellement
"
172 Case
"ERR
" & ERRDIALOGUNDEFINED : sLocal =
"Boîte de dialogue inconnue
"
173 Case
"ERR
" & ERRDIALOGSTARTED : sLocal =
"Dialogue déjà initialisé précédemment
"
174 Case
"ERR
" & ERRDIALOGNOTSTARTED : sLocal =
"Dialogue
'%
0' non initialisé
"
175 Case
"ERR
" & ERRRECORDSETNODATA : sLocal =
"Recordset n
'a pas fourni de données. Toute action sur les enregistrements est rejetée
"
176 Case
"ERR
" & ERRRECORDSETCLOSED : sLocal =
"Recordset a été clôturé. Action sur l
'enregistrement courant est rejetée
"
177 Case
"ERR
" & ERRRECORDSETRANGE : sLocal =
"L
'enregistrement courant est hors cadre
"
178 Case
"ERR
" & ERRRECORDSETFORWARD : sLocal =
"Action rejetée car recordset lisible seulement vers l
'avant ou n
'acceptant pas de signets
"
179 Case
"ERR
" & ERRFIELDNULL : sLocal =
"Champ nul ou vide. Action rejetée
"
180 Case
"ERR
" & ERRFILEACCESS : sLocal =
"Erreur d
'accès au fichier
'%
0'"
181 Case
"ERR
" & ERROVERFLOW : sLocal =
"La longueur du champ (%
0) dépasse la taille maximale autorisée. Utiliser de préférence la méthode
'%
1'"
182 Case
"ERR
" & ERRNOTACTIONQUERY : sLocal =
"La requête
'%
0' n
'est pas une requête d
'action
"
183 Case
"ERR
" & ERRNOTUPDATABLE : sLocal =
"La banque de données, le recordset ou le champ sont en lecture seulement
"
184 Case
"ERR
" & ERRUPDATESEQUENCE : sLocal =
"Erreur de séquence lors de la mise à jour d
'un Recordset
"
185 Case
"ERR
" & ERRNOTNULLABLE : sLocal =
"Le champ
'%
0' ne peut pas recevoir une valeur NULLe
"
186 Case
"ERR
" & ERRROWDELETED : sLocal =
"L
'enregistrement courant a été effacé par un autre processus ou un autre utilisateur
"
187 Case
"ERR
" & ERRRECORDSETCLONE : sLocal =
"Le clonage d
'un Recordset cloné est interdit
"
188 Case
"ERR
" & ERRQUERYDEFDELETED : sLocal =
"La requête existante
'%
0' a été supprimée
"
189 Case
"ERR
" & ERRTABLEDEFDELETED : sLocal =
"La table existante
'%
0' a été supprimée
"
190 Case
"ERR
" & ERRTABLECREATION : sLocal =
"La table
'%
0' n
'a pas pu être créée
"
191 Case
"ERR
" & ERRFIELDCREATION : sLocal =
"Le champ
'%
0' n
'a pas pu être créé
"
192 Case
"ERR
" & ERRSUBFORMNOTFOUND : sLocal =
"Sous-formulaire
'%
0' non trouvé dans le formulaire parent
'%
1'"
193 Case
"ERR
" & ERRWINDOW : sLocal =
"La fenêtre courante n
'est pas un document
"
194 Case
"ERR
" & ERRCOMPATIBILITY : sLocal =
"Le champ
'%
0' n
'a pas pu être converti à cause d
'une incompatibilité entre les types de champs supportés par les systèmes de bases de données respectifs
"
195 Case
"ERR
" & ERRPRECISION : sLocal =
"Le champ
'%
0' n
'a pas pu être chargé dans l
'enregistrement #%
1 par manque de capacité
"
196 Case
"ERR
" & ERRMODULENOTFOUND : sLocal =
"Le module
'%
0' est introuvable dans les librairies chargées actuellement
"
197 Case
"ERR
" & ERRPROCEDURENOTFOUND : sLocal =
"La procédure
'%
0' est introuvable dans le module
'%
1'"
198 '----------------------------------------------------------------------------------------------------------------------
199 Case
"OBJECT
" : sLocal =
"Objet
"
200 Case
"TABLE
" : sLocal =
"Table
"
201 Case
"QUERY
" : slocal =
"Requête
"
202 Case
"FORM
" : sLocal =
"Formulaire
"
203 Case
"REPORT
" : sLocal =
"Rapport
"
204 Case
"RECORDSET
" : sLocal =
"Recordset
"
205 Case
"FIELD
" : sLocal =
"Champ
"
206 Case
"TEMPVAR
" : sLocal =
"Variable temporaire
"
207 Case
"COMMANDBAR
" : sLocal =
"Barre de commande
"
208 Case
"COMMANDBARCONTROL
" : sLocal =
"Elément de barre de commande
"
209 '----------------------------------------------------------------------------------------------------------------------
210 Case
"ERR#
" : sLocal =
"L
'erreur #
"
211 Case
"ERROCCUR
" : sLocal =
"s
'est produite
"
212 Case
"ERRLINE
" : sLocal =
"à la ligne
"
213 Case
"ERRIN
" : sLocal =
"dans
"
214 Case
"CALLTO
" : sLocal =
"un appel à la fonction
"
215 Case
"SAVECONSOLE
" : sLocal =
"Sauver console
"
216 Case
"SAVECONSOLEENTRIES
" : sLocal =
"Les entrées de la console ont été sauvées avec succès.
"
217 Case
"QUITSHORT
" : sLocal =
"Quitter
"
218 Case
"QUIT
" : sLocal =
"Voulez-vous réellement quitter l
'application ? Les données modifiées seront sauvées.
"
219 Case
"ENTERING
" : sLocal =
"Entrée dans
"
220 Case
"EXITING
" : sLocal =
"Sortie de
"
221 '----------------------------------------------------------------------------------------------------------------------
222 Case
"DLGTRACE_HELP
" : sLocal =
"Gestion du tampon de la console et toutes ses entrées
"
223 Case
"DLGTRACE_TITLE
" : sLocal =
"Console
"
224 Case
"DLGTRACE_LBLENTRIES_HELP
" : sLocal =
"Effacer la liste et redimensionner le tampon circulaire
"
225 Case
"DLGTRACE_LBLENTRIES_LABEL
" : sLocal =
"Définir le nombre maximum d
'entrées
"
226 Case
"DLGTRACE_TXTTRACELOG_HELP
" : sLocal =
"Le texte peut être sélectionné, copié, ...
"
227 Case
"DLGTRACE_TXTTRACELOG_TEXT
" : sLocal =
"--- Le fichier journal est vide ---
"
228 Case
"DLGTRACE_CMDCANCEL_HELP
" : sLocal =
"Annuler et fermer la boîte de dialogue
"
229 Case
"DLGTRACE_CMDCANCEL_LABEL
" : sLocal =
"Annuler
"
230 Case
"DLGTRACE_LBLCLEAR_HELP
" : sLocal =
"Effacer la liste
"
231 Case
"DLGTRACE_LBLCLEAR_LABEL
" : sLocal =
"Effacer la liste
"
232 Case
"DLGTRACE_LBLMINLEVEL_HELP
" : sLocal =
"N
'enregistrer que les demandes de journalisation à partir du niveau indiqué
"
233 Case
"DLGTRACE_LBLMINLEVEL_LABEL
" : sLocal =
"Définir le niveau minimal d
'enregistrement
"
234 Case
"DLGTRACE_CMDOK_HELP
" : sLocal =
"Valider
"
235 Case
"DLGTRACE_CMDOK_LABEL
" : sLocal =
"OK
"
236 Case
"DLGTRACE_CMDDUMP_HELP
" : sLocal =
"Sélectionner un fichier et y vider le contenu actuel des traces enregistrées
"
237 Case
"DLGTRACE_CMDDUMP_LABEL
" : sLocal =
"Vider dans fichier
"
238 Case
"DLGTRACE_LBLNBENTRIES_HELP
" : sLocal =
"Taille actuelle de la liste
"
239 Case
"DLGTRACE_LBLNBENTRIES_LABEL
" : sLocal =
"Nombre actuel d
'entrées:
"
240 '----------------------------------------------------------------------------------------------------------------------
241 Case
"DLGFORMAT_HELP
" : sLocal =
"Exporter le formulaire
"
242 Case
"DLGFORMAT_TITLE
" : sLocal =
"OutputTo
"
243 Case
"DLGFORMAT_LBLFORMAT_HELP
" : sLocal =
"Format dans lequel le formulaire sera exporté
"
244 Case
"DLGFORMAT_LBLFORMAT_LABEL
" : sLocal =
"Selectionner le format de sortie
"
245 Case
"DLGFORMAT_CMDOK_HELP
" : sLocal =
"Valider votre choix
"
246 Case
"DLGFORMAT_CMDOK_LABEL
" : sLocal =
"OK
"
247 Case
"DLGFORMAT_CMDCANCEL_HELP
" : sLocal =
"Annuler et fermer la boîte de dialogue
"
248 Case
"DLGFORMAT_CMDCANCEL_LABEL
" : sLocal =
"Annuler
"
249 '----------------------------------------------------------------------------------------------------------------------
250 Case Else : sLocal = _Getlabel(psShortLabel,
"DEFAULT
")
252 '********************************************************
253 'Translated by Iñigo Zuluaga
254 '********************************************************
255 Case
"ES
" '(España)
256 Select Case UCase(psShortlabel)
257 Case
"ERR
" & ERRDBNOTCONNECTED : sLocal =
"No se ha encontrado una conexión activa a una base de datos
"
258 Case
"ERR
" & ERRMISSINGARGUMENTS : sLocal =
"Faltan argumentos o no están inicializados
"
259 Case
"ERR
" & ERRWRONGARGUMENT : sLocal =
"El argumento nr. %
0 [Value =
'%
1'] no es válido
"
260 Case
"ERR
" & ERRMAINFORM : sLocal =
"El documento
'%
0' no contiene ningún formulario
"
261 Case
"ERR
" & ERRFORMNOTIDENTIFIED : sLocal =
"No se ha identificado el formulario
'%
0' en el conjunto de formularios de la base de datos
"
262 Case
"ERR
" & ERRFORMNOTFOUND : sLocal =
"No se ha encontrado el formulario
'%
0'"
263 Case
"ERR
" & ERRFORMNOTOPEN : sLocal =
"El formulario
'%
0' no está abierto
"
264 Case
"ERR
" & ERRDFUNCTION : sLocal =
"La ejecución de DFunction falló, SQL=%
0"
265 Case
"ERR
" & ERROPENFORM : sLocal =
"El formulario
'%
0' no se puede abrir
"
266 Case
"ERR
" & ERRPROPERTY : sLocal =
"La propiedad
'%
0' no es aplicable en este contexto
"
267 Case
"ERR
" & ERRPROPERTYVALUE : sLocal =
"El valor
'%
0' es inválido para la propiedad
'%
1'"
268 Case
"ERR
" & ERRINDEXVALUE : sLocal =
"Fuera del rango de la matriz o tamaño incorrecto de la matriz para la propiedad
'%
0'"
269 Case
"ERR
" & ERRCOLLECTION : sLocal =
"Fuera del rango de la matriz
"
270 Case
"ERR
" & ERRPROPERTYNOTARRAY : sLocal =
"El argumento nr.%
0 debería ser una matriz
"
271 Case
"ERR
" & ERRCONTROLNOTFOUND : sLocal =
"El control
'%
0' not found in parent (formulario, control de tabla or diálogo)
'%
1'"
272 Case
"ERR
" & ERRNOACTIVEFORM : sLocal =
"No se ha encontrado un formulario o control activo
"
273 Case
"ERR
" & ERRDATABASEFORM : sLocal =
"El formulario
'%
0' no tiene datos subyacentes
"
274 Case
"ERR
" & ERRFOCUSINGRID : sLocal =
"No se ha encontrado el control
'%
0' en el control de tabla
'%
1'"
275 Case
"ERR
" & ERRNOGRIDINFORM : sLocal =
"No se ha encontrado un control de tabla en el formulario
'%
0'"
276 Case
"ERR
" & ERRFINDRECORD : sLocal =
"FindNext() tiene que ser precedido por una llamada exitosa de FindRecord(...)
"
277 Case
"ERR
" & ERRSQLSTATEMENT : sLocal =
"Error SQL, instrución SQL =
'%
0'"
278 Case
"ERR
" & ERROBJECTNOTFOUND : sLocal =
"%
0 '%
1' no encontrado
"
279 Case
"ERR
" & ERROPENOBJECT : sLocal =
"%
0 '%
1' no se puede abrir
"
280 Case
"ERR
" & ERRCLOSEOBJECT : sLocal =
"%
0 '%
1' no se puede abrir
"
281 Case
"ERR
" & ERRACTION : sLocal =
"Acción no aplicable en este contexto
"
282 Case
"ERR
" & ERRSENDMAIL : sLocal =
"No se puede activar el servicio de correo
"
283 Case
"ERR
" & ERRFORMYETOPEN : sLocal =
"El formulario %
0 ya está abierto
"
284 Case
"ERR
" & ERRMETHOD : sLocal =
"El método
'%
0' no es aplicable en este contexto
"
285 Case
"ERR
" & ERRPROPERTYINIT : sLocal =
"Propiedad
'%
0' aplicable pero no inicializada
"
286 Case
"ERR
" & ERRFILENOTCREATED : sLocal =
"No se ha podido crear el archivo
'%
0'"
287 Case
"ERR
" & ERRDIALOGNOTFOUND : sLocal =
"No se ha encontrado el diálogo
'%
0' en las bibliotecas cargadas actualmente
"
288 Case
"ERR
" & ERRDIALOGUNDEFINED : sLocal =
"Diálogo desconocido
"
289 Case
"ERR
" & ERRDIALOGSTARTED : sLocal =
"El diálogo ya está iniciado
"
290 Case
"ERR
" & ERRDIALOGNOTSTARTED : sLocal =
"El diálogo
'%
0' no está activo
"
291 Case
"ERR
" & ERRRECORDSETNODATA : sLocal =
"El Recordset no suministra datos. La acción en el registro actual rechazada
"
292 Case
"ERR
" & ERRRECORDSETCLOSED : sLocal =
"El recorset se ha cerrado. Acción con el Recordset rechazada
"
293 Case
"ERR
" & ERRRECORDSETRANGE : sLocal =
"Registro actual fuera de rango
"
294 Case
"ERR
" & ERRRECORDSETFORWARD : sLocal =
"Acción rechazada en un recorset legible sólo hacia adelante o que no admita marcadores
"
295 Case
"ERR
" & ERRFIELDNULL : sLocal =
"El campo es nulo o vacío. Acción rechazada
"
296 Case
"ERR
" & ERRFILEACCESS : sLocal =
"Error durante el acceso al archivo
'%
0'"
297 Case
"ERR
" & ERROVERFLOW : sLocal =
"La longitud del campo (%
0) excede la longitud máxima. Reemplazar por el método
'%
1'"
298 Case
"ERR
" & ERRNOTACTIONQUERY : sLocal =
"La consulta
'%
0' no es una consulta de acción
"
299 Case
"ERR
" & ERRNOTUPDATABLE : sLocal =
"La base de datos, el Recordset o el Campo es de sólo lectura
"
300 Case
"ERR
" & ERRUPDATESEQUENCE : sLocal =
"Error durante la secuencia de actualización del Recordset
"
301 Case
"ERR
" & ERRNOTNULLABLE : sLocal =
"El campo
'%
0' no puede contener un valor NULL
"
302 Case
"ERR
" & ERRROWDELETED : sLocal =
"La fila actual ha sido borrada por otro proceso o usuario
"
303 Case
"ERR
" & ERRRECORDSETCLONE : sLocal =
"No se puede clonar un Recordset clonado
"
304 Case
"ERR
" & ERRQUERYDEFDELETED : sLocal =
"Se ha borrado la consulta pre-existente
'%
0'"
305 Case
"ERR
" & ERRTABLEDEFDELETED : sLocal =
"Se ha borrado la tabla pre-existente
'%
0'"
306 Case
"ERR
" & ERRTABLECREATION : sLocal =
"No se ha podido crear la Tabla
'%
0'"
307 Case
"ERR
" & ERRFIELDCREATION : sLocal =
"No se ha podido crear el campo
'%
0'"
308 Case
"ERR
" & ERRSUBFORMNOTFOUND : sLocal =
"No se ha encontrado el Subformulario
'%
0' en el subformulario padre
'%
1'"
309 Case
"ERR
" & ERRWINDOW : sLocal =
"La ventana actual no es un documento
"
310 Case
"ERR
" & ERRCOMPATIBILITY : sLocal =
"El campo
'%
0' no se ha convertido debido a una incompatibilidad de los tipos de campo soportados entre las dos bases de datos
"
311 Case
"ERR
" & ERRPRECISION : sLocal =
"El campo
'%
0' no se ha cargado en el registro #%
1 por falta de capacidad
"
312 Case
"ERR
" & ERRMODULENOTFOUND : sLocal =
"Module
'%
0' not found in the currently loaded libraries
"
313 Case
"ERR
" & ERRPROCEDURENOTFOUND : sLocal =
"Procedure
'%
0' not found in module
'%
1'"
314 '----------------------------------------------------------------------------------------------------------------------
315 Case
"OBJECT
" : sLocal =
"Objeto
"
316 Case
"TABLE
" : sLocal =
"Tabla
"
317 Case
"QUERY
" : slocal =
"Consulta
"
318 Case
"FORM
" : sLocal =
"Formulario
"
319 Case
"REPORT
" : sLocal =
"Informe
"
320 Case
"RECORDSET
" : sLocal =
"Recordset
"
321 Case
"FIELD
" : sLocal =
"Campo
"
322 Case
"TEMPVAR
" : sLocal =
"Variable temporal
"
323 Case
"COMMANDBAR
" : sLocal =
"Barra de comandos
"
324 Case
"COMMANDBARCONTROL
" : sLocal =
"Control de barra de comandos
"
325 '----------------------------------------------------------------------------------------------------------------------
326 Case
"ERR#
" : sLocal =
"Error #
"
327 Case
"ERROCCUR
" : sLocal =
"ocurrido
"
328 Case
"ERRLINE
" : sLocal =
"en línea
"
329 Case
"ERRIN
" : sLocal =
"en
"
330 Case
"CALLTO
" : sLocal =
"una llamada a la función
"
331 Case
"SAVECONSOLE
" : sLocal =
"Guardar consola
"
332 Case
"SAVECONSOLEENTRIES
" : sLocal =
"Las entradas de la consola han sido guardadas correctamente.
"
333 Case
"QUITSHORT
" : sLocal =
"Cerrar
"
334 Case
"QUIT
" : sLocal =
"Quieres realmente cerrar la aplicación? los datos cambiados se guardarán.
"
335 Case
"ENTERING
" : sLocal =
"Entrando
"
336 Case
"EXITING
" : sLocal =
"Saliendo
"
337 '----------------------------------------------------------------------------------------------------------------------
338 Case
"DLGTRACE_HELP
" : sLocal =
"Gestión del buffer de la consola y sus entradas
"
339 Case
"DLGTRACE_TITLE
" : sLocal =
"Consola
"
340 Case
"DLGTRACE_LBLENTRIES_HELP
" : sLocal =
"Limpiar la lista y redimensionar el buffer circular
"
341 Case
"DLGTRACE_LBLENTRIES_LABEL
" : sLocal =
"Definir el número máximo de entradas
"
342 Case
"DLGTRACE_TXTTRACELOG_HELP
" : sLocal =
"El texto puede ser seleccionado, copiado, ...
"
343 Case
"DLGTRACE_TXTTRACELOG_TEXT
" : sLocal =
"--- El archivo Histórico está vacío ---
"
344 Case
"DLGTRACE_CMDCANCEL_HELP
" : sLocal =
"Cancelar y cerrar el diálogo
"
345 Case
"DLGTRACE_CMDCANCEL_LABEL
" : sLocal =
"Cancelar
"
346 Case
"DLGTRACE_LBLCLEAR_HELP
" : sLocal =
"Limpiar la lista
"
347 Case
"DLGTRACE_LBLCLEAR_LABEL
" : sLocal =
"Limpiar la lista
"
348 Case
"DLGTRACE_LBLMINLEVEL_HELP
" : sLocal =
"No registrar más que las peticiones de registro a partir de un nivel indicado
"
349 Case
"DLGTRACE_LBLMINLEVEL_LABEL
" : sLocal =
"Definir el nivel mínimo de registro
"
350 Case
"DLGTRACE_CMDOK_HELP
" : sLocal =
"Validar
"
351 Case
"DLGTRACE_CMDOK_LABEL
" : sLocal =
"Aceptar
"
352 Case
"DLGTRACE_CMDDUMP_HELP
" : sLocal =
"Elegir un archivo y guardar en él el contenido de la lista actual
"
353 Case
"DLGTRACE_CMDDUMP_LABEL
" : sLocal =
"Guardar en a archivo
"
354 Case
"DLGTRACE_LBLNBENTRIES_HELP
" : sLocal =
"Tamaño actual de la lista
"
355 Case
"DLGTRACE_LBLNBENTRIES_LABEL
" : sLocal =
"Numero actual de entradas:
"
356 '----------------------------------------------------------------------------------------------------------------------
357 Case
"DLGFORMAT_HELP
" : sLocal =
"Exportar el formulario
"
358 Case
"DLGFORMAT_TITLE
" : sLocal =
"Exportar como
"
359 Case
"DLGFORMAT_LBLFORMAT_HELP
" : sLocal =
"Formato en el que será ser exportado el formulario
"
360 Case
"DLGFORMAT_LBLFORMAT_LABEL
" : sLocal =
"Seleccionar el formato de salida
"
361 Case
"DLGFORMAT_CMDOK_HELP
" : sLocal =
"Validar su elección
"
362 Case
"DLGFORMAT_CMDOK_LABEL
" : sLocal =
"Aceptar
"
363 Case
"DLGFORMAT_CMDCANCEL_HELP
" : sLocal =
"Cancelar y cerrar el diálogo
"
364 Case
"DLGFORMAT_CMDCANCEL_LABEL
" : sLocal =
"Cancelar
"
365 '----------------------------------------------------------------------------------------------------------------------
366 Case Else : sLocal = _Getlabel(psShortLabel,
"DEFAULT
")
368 '********************************************************
369 'Translated by Gisbert Friege
370 '********************************************************
372 Select Case UCase(psShortlabel)
373 Case
"ERR
" & ERRDBNOTCONNECTED : sLocal =
"Keine aktive Verbindung zu einer Datenbank gefunden
"
374 Case
"ERR
" & ERRMISSINGARGUMENTS : sLocal =
"Argumente fehlen oder sind nicht initialisiert
"
375 Case
"ERR
" & ERRWRONGARGUMENT : sLocal =
"Argument Nr. %
0 [Wert =
'%
1'] ist ungültig
"
376 Case
"ERR
" & ERRMAINFORM : sLocal =
"Dokument
'%
0' enthält kein Formular
"
377 Case
"ERR
" & ERRFORMNOTIDENTIFIED : sLocal =
"Formular
'%
0' nicht bei den Datenbank-Formularen erkannt
"
378 Case
"ERR
" & ERRFORMNOTFOUND : sLocal =
"Formular
'%
0' nicht gefunden
"
379 Case
"ERR
" & ERRFORMNOTOPEN : sLocal =
"Formular
'%
0' ist zur Zeit nicht offen
"
380 Case
"ERR
" & ERRDFUNCTION : sLocal =
"DFunction Ausführung misslungen, SQL=%
0"
381 Case
"ERR
" & ERROPENFORM : sLocal =
"Formular
'%
0' konnte nicht geöffnet werden
"
382 Case
"ERR
" & ERRPROPERTY : sLocal =
"Eigenschaft
'%
0' in diesem Kontext nicht anwendbar
"
383 Case
"ERR
" & ERRPROPERTYVALUE : sLocal =
"Wert
'%
0' ist ungültig für die Eigenschaft
'%
1'"
384 Case
"ERR
" & ERRINDEXVALUE : sLocal =
"Außerhalb des Array-Bereichs oder falsche Array-Größe für Eigenschaft
'%
0'"
385 Case
"ERR
" & ERRCOLLECTION : sLocal =
"Außerhalb des Array-Bereichs
"
386 Case
"ERR
" & ERRPROPERTYNOTARRAY : sLocal =
"Argument Nr.%
0 sollte ein Array sein
"
387 Case
"ERR
" & ERRCONTROLNOTFOUND : sLocal =
"Steuerelement
'%
0' nicht gefunden in parent (Formular, Tabelle oder Dialog)
'%
1'"
388 Case
"ERR
" & ERRNOACTIVEFORM : sLocal =
"Kein aktives Formular oder Steuerelement gefunden
"
389 Case
"ERR
" & ERRDATABASEFORM : sLocal =
"Formular
'%
0' basiert nicht auf einem Datensatz
"
390 Case
"ERR
" & ERRFOCUSINGRID : sLocal =
"Steuerelement
'%
0' im Tabellen-Steuerelement
'%
1' nicht gefunden
"
391 Case
"ERR
" & ERRNOGRIDINFORM : sLocal =
"Kein Tabellen-Steuerelement im Formular
'%
0' gefunden
"
392 Case
"ERR
" & ERRFINDRECORD : sLocal =
"Bei FindNext() muss ein erfolgreicher FindRecord(...)-Aufruf vorhergehen
"
393 Case
"ERR
" & ERRSQLSTATEMENT : sLocal =
"SQL Error, SQL statement =
'%
0'"
394 Case
"ERR
" & ERROBJECTNOTFOUND : sLocal =
"%
0 '%
1' nicht gefunden
"
395 Case
"ERR
" & ERROPENOBJECT : sLocal =
"%
0 '%
1' konnte nicht geöffnet werden
"
396 Case
"ERR
" & ERRCLOSEOBJECT : sLocal =
"%
0 '%
1' konnte nicht geschlossen werden
"
397 Case
"ERR
" & ERRACTION : sLocal =
"Aktion in diesem Kontext nicht anwendbar
"
398 Case
"ERR
" & ERRSENDMAIL : sLocal =
"Email-Dienst konnte nicht aktiviert werden
"
399 Case
"ERR
" & ERRFORMYETOPEN : sLocal =
"Formular %
0 ist schon offen
"
400 Case
"ERR
" & ERRMETHOD : sLocal =
"Methode
'%
0' in diesem Kontext nicht anwendbar
"
401 Case
"ERR
" & ERRPROPERTYINIT : sLocal =
"Eigenschaft
'%
0' anwendbar aber nicht initialisiert
"
402 Case
"ERR
" & ERRFILENOTCREATED : sLocal =
"Datei
'%
0' konnte nicht erzeugt werden
"
403 Case
"ERR
" & ERRDIALOGNOTFOUND : sLocal =
"Dialog
'%
0' nicht in den aktuell geladenen Bibliotheken gefunden
"
404 Case
"ERR
" & ERRDIALOGUNDEFINED : sLocal =
"Dialog unbekannt
"
405 Case
"ERR
" & ERRDIALOGSTARTED : sLocal =
"Dialog schon gestartet
"
406 Case
"ERR
" & ERRDIALOGNOTSTARTED : sLocal =
"Dialog
'%
0' nicht aktiv
"
407 Case
"ERR
" & ERRRECORDSETNODATA : sLocal =
"Datensatz ergab keine Daten. Aktion auf aktuellem Datensatz verweigert
"
408 Case
"ERR
" & ERRRECORDSETCLOSED : sLocal =
"Datensatz wurde geschlossen. Datensatz-Aktion verweigert
"
409 Case
"ERR
" & ERRRECORDSETRANGE : sLocal =
"Aktueller Datensatz außerhalb des Bereichs
"
410 Case
"ERR
" & ERRRECORDSETFORWARD : sLocal =
"Aktion verweigert auf einem nur vorwärts lesbaren oder keine Textmarken unterstützenden Datensatz
"
411 Case
"ERR
" & ERRFIELDNULL : sLocal =
"Feld ist null oder leer. Aktion verweigert
"
412 Case
"ERR
" & ERRFILEACCESS : sLocal =
"Dateizugriffs-Fehler bei Datei
'%
0'"
413 Case
"ERR
" & ERROVERFLOW : sLocal =
"Feldlänge (%
0) überschreitet die maximale Länge. Verwende stattdessen die Methode
'%
1'"
414 Case
"ERR
" & ERRNOTACTIONQUERY : sLocal =
"Abfrage
'%
0' ist keine Aktionsabfrage
"
415 Case
"ERR
" & ERRNOTUPDATABLE : sLocal =
"Datenbank, Datensatz oder Feld kann nur gelesen werden
"
416 Case
"ERR
" & ERRUPDATESEQUENCE : sLocal =
"Datensatz-Update Folgefehler
"
417 Case
"ERR
" & ERRNOTNULLABLE : sLocal =
"Feld
'%
0' darf keinen NULL-Wert haben
"
418 Case
"ERR
" & ERRROWDELETED : sLocal =
"Aktuelle Zeile wurde durch einen anderen Prozess oder Benutzer gelösch
"
419 Case
"ERR
" & ERRRECORDSETCLONE : sLocal =
"Ein geklonter Datensatz kann nicht geklont werden
"
420 Case
"ERR
" & ERRQUERYDEFDELETED : sLocal =
"Bereits vorhandene Abfrage
'%
0' wurde gelöscht
"
421 Case
"ERR
" & ERRTABLEDEFDELETED : sLocal =
"Bereits vorhandene Tabelle
'%
0' wurde gelöscht
"
422 Case
"ERR
" & ERRTABLECREATION : sLocal =
"Tabelle
'%
0' konnte nicht erzeugt werden
"
423 Case
"ERR
" & ERRFIELDCREATION : sLocal =
"Feld
'%
0' konnte nicht erzeugt werden
"
424 Case
"ERR
" & ERRSUBFORMNOTFOUND : sLocal =
"Unterformular
'%
0' nicht im Eltern-Formular
'%
1 gefunden
"
425 Case
"ERR
" & ERRWINDOW : sLocal =
"Aktuelles Fenster ist kein Dokument
"
426 Case
"ERR
" & ERRCOMPATIBILITY : sLocal =
"Feld
'%
0' konnte wegen inkompatibler Feldtypen der Datenbanksysteme nicht konvertiert werden
"
427 Case
"ERR
" & ERRPRECISION : sLocal =
"Feld
'%
0' konnte wegen fehlender Speicherkapazität nicht in den Datensatz #%
1 geladen werden
"
428 Case
"ERR
" & ERRMODULENOTFOUND : sLocal =
"Modul
'%
0' nicht gefunden in den aktuell geladen Bibliotheken
"
429 Case
"ERR
" & ERRPROCEDURENOTFOUND : sLocal =
"Prozedur
'%
0' im Modul
'%
1' nicht gefunden
"
430 '----------------------------------------------------------------------------------------------------------------------
431 Case
"OBJECT
" : sLocal =
"Objekt
"
432 Case
"TABLE
" : sLocal =
"Tabelle
"
433 Case
"QUERY
" : slocal =
"Abfrage
"
434 Case
"FORM
" : sLocal =
"Formular
"
435 Case
"REPORT
" : sLocal =
"Report
"
436 Case
"RECORDSET
" : sLocal =
"Datensatz
"
437 Case
"FIELD
" : sLocal =
"Feld
"
438 Case
"TEMPVAR
" : sLocal =
"Temporäre Variable
"
439 Case
"COMMANDBAR
" : sLocal =
"Befehlsleiste
"
440 Case
"COMMANDBARCONTROL
" : sLocal =
"Befehlsleisten-Steuerelement
"
441 '----------------------------------------------------------------------------------------------------------------------
442 Case
"ERR#
" : sLocal =
"Error #
"
443 Case
"ERROCCUR
" : sLocal =
"aufgetreten
"
444 Case
"ERRLINE
" : sLocal =
"in Zeile
"
445 Case
"ERRIN
" : sLocal =
"in
"
446 Case
"CALLTO
" : sLocal =
"ein Funktionsaufruf
"
447 Case
"SAVECONSOLE
" : sLocal =
"Konsoleneingaben sichern
"
448 Case
"SAVECONSOLEENTRIES
" : sLocal =
"Die Konsoleneingaben wurden erfolgreich gesichert.
"
449 Case
"QUITSHORT
" : sLocal =
"Beenden
"
450 Case
"QUIT
" : sLocal =
"Wollen Sie wirklich die Anwendung beenden? Geänderte Daten werden gesichert.
"
451 Case
"ENTERING
" : sLocal =
"Beginne mit
"
452 Case
"EXITING
" : sLocal =
"Verlasse
"
453 '----------------------------------------------------------------------------------------------------------------------
454 Case
"DLGTRACE_HELP
" : sLocal =
"Verwalte den Konsolenpuffer und seine Eingaben
"
455 Case
"DLGTRACE_TITLE
" : sLocal =
"Konsole
"
456 Case
"DLGTRACE_LBLENTRIES_HELP
" : sLocal =
"Leere die Liste und ändere die Größe des Umlaufpuffers
"
457 Case
"DLGTRACE_LBLENTRIES_LABEL
" : sLocal =
"Setze maximale Anzahl von Eingaben
"
458 Case
"DLGTRACE_TXTTRACELOG_HELP
" : sLocal =
"Text kann ausgewählt, kopiert, ... werden
"
459 Case
"DLGTRACE_TXTTRACELOG_TEXT
" : sLocal =
"--- Log Datei ist leer ---
"
460 Case
"DLGTRACE_CMDCANCEL_HELP
" : sLocal =
"Abbrechen und den Dialog schließen
"
461 Case
"DLGTRACE_CMDCANCEL_LABEL
" : sLocal =
"Abbrechen
"
462 Case
"DLGTRACE_LBLCLEAR_HELP
" : sLocal =
"Leere die Liste
"
463 Case
"DLGTRACE_LBLCLEAR_LABEL
" : sLocal =
"Leere die Liste
"
464 Case
"DLGTRACE_LBLMINLEVEL_HELP
" : sLocal =
"Registriere nur Logging-Anfragen oberhalb des gegebenen Levels
"
465 Case
"DLGTRACE_LBLMINLEVEL_LABEL
" : sLocal =
"Setze minimalen Fehlerbehandlungs-Level
"
466 Case
"DLGTRACE_CMDOK_HELP
" : sLocal =
"Übernehmen
"
467 Case
"DLGTRACE_CMDOK_LABEL
" : sLocal =
"OK
"
468 Case
"DLGTRACE_CMDDUMP_HELP
" : sLocal =
"Wähle eine Datei und speichere darin den aktuellen Listeninhalt
"
469 Case
"DLGTRACE_CMDDUMP_LABEL
" : sLocal =
"Ausgabe in Datei
"
470 Case
"DLGTRACE_LBLNBENTRIES_HELP
" : sLocal =
"Aktuelle Länge der Liste
"
471 Case
"DLGTRACE_LBLNBENTRIES_LABEL
" : sLocal =
"Aktuelle Anzahl von Einträgen:
"
472 '----------------------------------------------------------------------------------------------------------------------
473 Case
"DLGFORMAT_HELP
" : sLocal =
"Exportiere das Formular
"
474 Case
"DLGFORMAT_TITLE
" : sLocal =
"Export
"
475 Case
"DLGFORMAT_LBLFORMAT_HELP
" : sLocal =
"Format, in dem das Formular exportiert werden soll
"
476 Case
"DLGFORMAT_LBLFORMAT_LABEL
" : sLocal =
"Wähle das Ausgabe-Format
"
477 Case
"DLGFORMAT_CMDOK_HELP
" : sLocal =
"Auswahl übernehmen
"
478 Case
"DLGFORMAT_CMDOK_LABEL
" : sLocal =
"OK
"
479 Case
"DLGFORMAT_CMDCANCEL_HELP
" : sLocal =
"Abbrechen und den Dialog schließen
"
480 Case
"DLGFORMAT_CMDCANCEL_LABEL
" : sLocal =
"Abbrechen
"
481 '----------------------------------------------------------------------------------------------------------------------
482 Case Else : sLocal = _Getlabel(psShortLabel,
"DEFAULT
")
484 REM *******************************************************************************************************************************************
486 REM *** ANY OTHER LANGUAGE TO BE INSERTED HERE ***
488 REM *******************************************************************************************************************************************
490 sLocal = _Getlabel(psShortLabel,
"DEFAULT
")
497 sLocal = psShortLabel
499 End Function
' GetLabel V0.8
.9
501 REM -----------------------------------------------------------------------------------------------------------------------
502 Public Function _GetLabelArray(ByVal pvShortlabel As Variant, Optional ByVal psLocale As String) As Variant
503 ' Return the localized label corresponding with the ShortLabel array of strings
505 If IsMissing(psLocale) Then psLocale = UCase(Left(_GetLocale(),
2)) Else psLocale = UCase(psLocale)
506 On Local Error Goto Error_Function
508 Dim vLocal() As Variant, i As integer
511 If Not IsArray(pvShortLabel) Then
512 vLocal = _GetLabel(pvShortLabel, psLocale)
516 ReDim vLocal(LBound(pvShortLabel) To UBound(pvShortlabel))
517 For i = LBound(pvShortLabel) To UBound(pvShortlabel)
518 vLocal(i) = _GetLabel(pvShortLabel(i), psLocale)
522 _GetlabelArray = vLocal()
527 End Function
' GetLabelArray V0.8
.9
529 REM -----------------------------------------------------------------------------------------------------------------------
530 Public Function _GetLocale() as String
531 'Return OO localization
532 'Derived from Tools library
534 Dim oLocale as Object
535 oLocale = _GetRegistryKeyContent(
"org.openoffice.Setup/L10N
")
536 _GetLocale = oLocale.getByName(
"ooLocale
")
537 End Function
' GetLocale V0.8
.9