Hallo Robert hallo Hans!
Der richtige Hinweis war "Boundfield" muss man verwenden um den
Datensatz eines Formular Feldes zu verändern.
Komplet sieht es dann etwa so aus.
SUB Datum
Dim oForm, oDate, oControl
'Datum in Formular schreiben
oForm = ThisComponent.DrawPage.Forms.getByName("FormPagoCuota") 'Formular
oControl = oForm.getByName("datCuota_Pagos_Fecha") 'Feld
oDate = oControl.Boundfield.getDate()
oDate.day=day(date())
oDate.month=month(date())
oDate.year=year(date())
oControl.BoundField.updateDate(oDate)
END SUB
Was etwas komisch ist das ich keine Möglichkeit gefunden habe um das
Datum auf einmal zu schreiben.
Ooo Basic ist im vergleich mit MS Basic oder PHP recht umständlich vor
allem habe ich bis heute keine gute Beispieldatei gefunden wenn ich
nicht weiter komme. Selbst im Buch Makros für Oo wird das nicht beschrieben.
Wäre gerne bereit meine Beispiele zur Verfügung zu stellen ich habe einige.
Danke für eure Hilfe
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
