Lotus Notes / Domino Sonstiges > Tools & Downloads

Tool zum schnellen wechseln der Sprache

(1/2) > >>

ByteBuster:
Hallo zusammen,

gibt es eigendlich ein Tool das mir den wechsel zwischen der deutschen und englischen Rechtschreibprüfung ermöglicht ohne runter und rauf von Notes ?
Das wäre echt cool !

Uwe ;D

wflamme:
http://www-10.lotus.com/ldd/sandbox.nsf/ecc552f1ab6e46e4852568a90055c4cd/aa6912f7bfcc22f485256cb700620bdd?OpenDocument&Highlight=0,language
...könnte helfen.

skro:
Hallo Uwe,

wir benutzen einen Button mit folgendem Script in der Maske "Memo":

Sub Click(Source As Button)
   Dim SN As New NotesSession
   Dim ws As New NotesUIWorkspace
   Dim uiDoc As NotesUIDocument
   Dim DB As NotesDatabase
   Dim sprache(0 To 1) As String
   Dim swahl As String
   
   Set db = sn.CurrentDatabase
   Set uidoc = ws.currentdocument
   
   sprache(0) = "Englisch"
   sprache(1) = "Deutsch"
      
   swahl = ws.prompt(prompt_okcancelcombo, "Sprache wählen", "In welcher Sprache soll die Rechtshreibprüfung ausgeführt werden?", "", sprache)
   
   Select Case swahl
   Case "Englisch"
      sn.SetEnvironmentVar "SPELL_LANG", "1033", True
      sn.SetEnvironmentVar "Preference_en",",,,1033,,,,,,", True
   Case "Deutsch" '1031
      sn.SetEnvironmentVar "SPELL_LANG", "32775", True
      sn.SetEnvironmentVar "Preference_de",",,,32775,,,,,,", True
   Case Else
      Exit Sub
   End Select
   
   Call uiDoc.SpellCheck()
End Sub

Gruß
Stefan

ByteBuster:
 :D :D :D :D :D :D :D
Ich danke Euch !

Da ich in der Programierung nicht so fit bin habe ich mich für das fertige Tool entschieden und das klappt wirklich prima !

Danke an Euch !  ;D

Uwe

ByteBuster:
 ??? Noch eine Frage  ??? wo bekomme ich das Francias.dic her ???

Uwe ???

Navigation

[0] Themen-Index

[#] Nächste Seite