summaryrefslogtreecommitdiff
path: root/wizards/source/access2base/L10N.xba
diff options
context:
space:
mode:
authorJean-Pierre Ledure <jp@ledure.be>2014-08-12 12:08:48 +0200
committerJean-Pierre Ledure <jp@ledure.be>2014-08-17 06:18:45 -0500
commit8393014898d67795f44835791aa0d9ed535be5d3 (patch)
tree56c5c25caa6746279461d416cb3bde0b52be31e7 /wizards/source/access2base/L10N.xba
parent99b9e06b7cdfd1f3336226583d73aa49cc6ce305 (diff)
Access2Base - non-Base components
So far the first call to the API was a call to the OpenConnection method. Without an OpenConnection some methods issued a cryptic "Object variable not set" Basic run-time message. It is now intercepted to make it clearer. A number of features are not database related: error handling, events handling, windows move/resize, dialogs, ... They have been identified and adapted to be callable without database connection. As such they are callable from any LO component, not only Base. Change-Id: I99f408c8404a6192149747228b2b8493b9df5ae3 Reviewed-on: https://gerrit.libreoffice.org/10883 Reviewed-by: Jean-Pierre Ledure <jp@ledure.be> Tested-by: Jean-Pierre Ledure <jp@ledure.be>
Diffstat (limited to 'wizards/source/access2base/L10N.xba')
-rw-r--r--wizards/source/access2base/L10N.xba4
1 files changed, 2 insertions, 2 deletions
diff --git a/wizards/source/access2base/L10N.xba b/wizards/source/access2base/L10N.xba
index ff1ce5bcc29e..b5f99a0d7b95 100644
--- a/wizards/source/access2base/L10N.xba
+++ b/wizards/source/access2base/L10N.xba
@@ -25,7 +25,7 @@ Dim sLocal As String
Select Case psLocale
Case &quot;EN&quot;, &quot;DEFAULT&quot;
Select Case UCase(psShortlabel)
- Case &quot;ERR&quot; &amp; ERRDBNOTCONNECTED : sLocal = &quot;Connection to the database is not active&quot;
+ Case &quot;ERR&quot; &amp; ERRDBNOTCONNECTED : sLocal = &quot;No active connection to a database found&quot;
Case &quot;ERR&quot; &amp; ERRMISSINGARGUMENTS : sLocal = &quot;Arguments are missing or are not initialized&quot;
Case &quot;ERR&quot; &amp; ERRWRONGARGUMENT : sLocal = &quot;Argument nr. %0 [Value = &apos;%1&apos;] is invalid&quot;
Case &quot;ERR&quot; &amp; ERRMAINFORM : sLocal = &quot;Document &apos;%0&apos; does not contain any form&quot;
@@ -129,7 +129,7 @@ Dim sLocal As String
End Select
Case &quot;FR&quot;
Select Case UCase(psShortlabel)
- Case &quot;ERR&quot; &amp; ERRDBNOTCONNECTED : sLocal = &quot;Pas de connexion active à la banque de données&quot;
+ Case &quot;ERR&quot; &amp; ERRDBNOTCONNECTED : sLocal = &quot;Pas de connexion active trouvée à une banque de données&quot;
Case &quot;ERR&quot; &amp; ERRMISSINGARGUMENTS : sLocal = &quot;Des arguments sont manquants ou non initialisés&quot;
Case &quot;ERR&quot; &amp; ERRWRONGARGUMENT : sLocal = &quot;L&apos;argument n° %0 [Valeur = &apos;%1&apos;] n&apos;est pas valable&quot;
Case &quot;ERR&quot; &amp; ERRMAINFORM : sLocal = &quot;Le document &apos;%0&apos; ne contient aucun formulaire&quot;