OpenOffice.info

sub setwert
  odocument = thiscomponent
  Dim Var as String
  Dim oTextfieldMaster As Object
  Dim oPropSet as Object
  Dim oDependentTextFields as Object
  Dim oXDependentTextField as Object
  Dim oTextFields as Object
  Dim OldValue as String
  Dim NewValue as Integer
' Die Variable wird über den festgelegten Namen, hier "Wert", aufgerufen
  Var ="com.sun.star.text.FieldMaster.SetExpression.Wert"
  oTextfieldMasters = oDocument.getTextFieldMasters()
  oPropSet = oTextfieldMasters.getByName(Var)
  oDependentTextFields = oPropSet.DependentTextFields
  oXDependentTextField = oDependentTextFields(0)
 'Jetzt wird der alte Wert ausgelesen und um eins erhöht
  oldValue = oXDependentTextField.Content
  newValue = cint(oldValue)
  newValue=newValue+1
  oXDependentTextField.setPropertyValue("Content",cstr(newValue)) 
  odocument.textfields.refresh()
end sub

Dann versuchen wir es mal in der langen Version:


Du hast unter Einfügen -> Feldbefehl -> Andere -> Variablen eine Variable erzeugt. Hier im Beispiel mit dem Namen "Wert".
Um diese Variable zu ändern geht man folgenderweise vor:

[code]
sub setwert
odocument = thiscomponent
Dim Var as String
Dim oTextfieldMaster As Object
Dim oPropSet as Object
Dim oDependentTextFields as Object
Dim oXDependentTextField as Object
Dim oTextFields as Object
Dim OldValue as String
Dim NewValue as Integer
' Die Variable wird über den festgelegten Namen, hier "Wert", aufgerufen
Var ="com.sun.star.text.FieldMaster.SetExpression.Wert"
oTextfieldMasters = oDocument.getTextFieldMasters()
oPropSet = oTextfieldMasters.getByName(Var)
oDependentTextFields = oPropSet.DependentTextFields
oXDependentTextField = oDependentTextFields(0)
'Jetzt wird der alte Wert ausgelesen und um eins erhöht
oldValue = oXDependentTextField.Content
newValue = cint(oldValue)
newValue=newValue+1
oXDependentTextField.setPropertyValue("Content",cstr(newValue))
odocument.textfields.refresh()
end sub
[/code]


mfg
Michael

Hallo,


schau mal hier: [url]http://www.starbasicfaq.de/WiekannmanaufVariablenzugreifen..html#Zweig227[/url]
Dort ist beschrieben wie man auf eine Variable zugreifen kann.

mfg
Michael