Re: [de-users] LO Base 4.0 - Datumfeld mit aktuellem Datum via Basic füllen

Hallo Ulrich,

der Zugriff CDateToIso(Date) funktioniert bei updateDate nicht. Basic
erwartet dort ein Objekt. Folgender Code bringt ein komplettes Datum
richtig ein:

SUB Datum_aktuell
        DIM oDoc AS OBJECT
        DIM oDrawpage AS OBJECT
        DIM oForm AS OBJECT
        DIM unoDate
        oDoc = thisComponent
        oDrawpage = oDoc.drawpage
        oForm = oDrawpage.forms.getByName("Formular")
        oFeld=oForm.getByName("Datum")  
        unoDate = createUnoStruct("com.sun.star.util.Date")
        unoDate.Year = Year(Date)
        unoDate.Month = Month(Date)
        unoDate.Day = Day(Date)
        oFeld.BoundField.updateDate(unoDate)
END SUB

Gruß

Robert

-- 
Informationen zum Abmelden: E-Mail an users+help@de.libreoffice.org
Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert